Hocam dediğiniz şekilde düzenlemeleri yaptım. İlk başta çalışıyordu. Ama sona hata vermeye başladı.
Hata ile ilgili resimler ektedir. Nerde hata yaptım anlamıyorum
(26/12/2011, 13:04)iscinar yazdı: Önceki mesajda belirttiğim gibi liste kutusu işini görür gibi geliyor.
Ana forma Bir liste kutusu iki metin kutusu ekle.
Liste kaynağı sorgunun ölçütüne
Like "*" & [Formlar]![Frm_Ana]![Form2].[Form]![plakagizli] & "*"
yaz
metin kutularının birini gizle görünen kutunun değiştiğinde olayına
Private Sub plakasuzgec_Change()
Dim Bul As String
Bul = plakasuzgec.Text
Me.plakagizli.Value = Bul
Me.CezaListe.Requery
End Sub
yaz ve dene (alan isimleri benim formumdakilerdir kopyala yapıştır yaptım kendine göre uyarla)
arayacağın kutuya her girdiğin harfte sorgulama olması lazım
Diğer sorunu hallettim Hocam.
Bakalım anlamış mıyım?
Formumuza (ResmiYazışma/ResmiYazışmaAlt) iki metin kutusu ve bir liste ekliyoruz. K1, K2 metin Kutusu; L1 de liste adı olsun.
K2 Gizli, K1 görünür olcak.
L2 Veri Kaynağı Sogusuna
Like "*" & [Formlar]![ResmiYazışma]![ResmiYazışmaAlt].[Form]![K1] & "*"
yazıyoruz.
K1 Metin kutusunun Değiştiğinde olayına
Private Sub K1_Change()
Dim Bul As String
Bul = K1.Text
Me.K2.Value = Bul
Me.L1.Requery
End Sub
Yazacağız değil mi hocam?
Böyle yaptım ama olmadı.
Örneği ekte sunuyorum. Yardımlarıız için teşekkür ederim. Bu arada 2010 kullanıyorum.
Gün gelecek herkes beni ve Access'i anlayacak!!!
Cevapla
Son Düzenleme: 26/12/2011, 17:52, Düzenleyen: kursad05.