AccessTr.neT
Metin Kutularında Otomatik Tamamlama - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: Metin Kutularında Otomatik Tamamlama (/konu-metin-kutularinda-otomatik-tamamlama.html)

Sayfalar: 1 2 3 4 5 6 7


Cvp: Metin Kutularında Otomatik Tamamlama - akem - 24/05/2009

Örnek Çok güzel ve oldukça kullanışlı.. Bununla ilgili bir soru sormak istiyorum. Bu uygulamayı hiçbir denetime bağlı olmayan yani ilişiksiz bir metin kutusunda istediğimiz denetimden yada tablodan veya sorgudan seçtirerek yapabilirmiyiz..


Cvp: Metin Kutularında Otomatik Tamamlama - esrefigit - 25/05/2009

evet yapılır sadece yukardaki kodun gerekli yerlerini yani curretdata olan yerlerini dao yada ado ya çevirerek yapılabilir
Option Compare Database
Option Explicit
Dim Rs As Recordset, tamamla As Boolean

Private Sub KONU_Change()
On Error Resume Next
Dim txtSel As String, iSel As Integer
If tamamla = 0 Then
'bir şey
Else
tamamla = 0
iSel = Len(Me!KONU.Text)
Rs.FindFirst "KONU like '" & KONU.Text & "*'"
If Not Rs.NoMatch Then
txtSel = Mid(Rs!KONU, Len(KONU.Text) + 1)
Me!KONU.SelText = txtSel
Me!KONU.SelStart = iSel
Me!KONU.SelLength = Len(txtSel)
Else
Me!KONU.SelStart = iSel
End If
End If

End Sub

Private Sub KONU_Enter()
Set Rs = CurrentDb.OpenRecordset("Sorgu1", dbOpenDynaset)
End Sub

Private Sub KONU_Exit(Cancel As Integer)
On Error Resume Next
Set Rs = Nothing

End Sub

Private Sub KONU_KeyDown(KeyCode As Integer, Shift As Integer)
On Error Resume Next
If KeyCode = 8 Then
tamamla = 0
Else
tamamla = -1
End If

End Sub


bu tamamen hiç bir tabloya bağlı olmayan form ve ilişkisz metin kutuları için yapılmıştır


Cvp: Metin Kutularında Otomatik Tamamlama - benremix - 28/06/2009

Sn Esrefigit Hocam ellerine sağlık çok güzel olmuş. İşime çok yarayacak.Teşekkürler. Saygılar...


Cvp: Metin Kutularında Otomatik Tamamlama - meraklısıyım - 04/11/2009

Eline sağlık hocam


Cvp: Metin Kutularında Otomatik Tamamlama - metehan16 - 01/12/2012

merhaba arkadaşlar konu açılalı bayaa olmuş ama Access 2010 ve 2007 de hata veriyo bu kod otomotiktamamla (Screen.ActiveForm.ActiveControl.ControlSource)
ve
bu modülü formla ilişkilendirmemiz gerekiyor mu??


Cvp: Metin Kutularında Otomatik Tamamlama - ozanakkaya - 02/12/2012

ofis 2010'da hata vermeden çalıştı. İlişkilendirmeden neyi kasteddiğini anlamadım ama
Modül olmadan formdaki kod çalışmaz.