+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Liste Kutusu Filtreleme (/konu-liste-kutusu-filtreleme--90211.html)
Sayfalar:
1
2
Liste Kutusu Filtreleme - macirercan - 06/12/2022
Herkese merhaba. Ekteki örnek çalışmada liste kutusunda filtre yapıyorum, sayı 1 kutucuğuna girilen değer listeleniyor. İstediğim bu. Lakin kutucuk boş olduğunda tüm verilerin gelmesi için ne yapmalıyım. Yardımlarınız için şimdiden çok teşekkür ederim.
RE: Liste Kutusu Filtreleme - C*e*l*o*y*c*e - 06/12/2022
merhaba
Sorguyu şu şekilde değiştirp deneyin
Like "*" & [Formlar]![Form1]![Metin2] & "*"
RE: Liste Kutusu Filtreleme - macirercan - 06/12/2022
Merhaba. O şekilde yaptığımda da 1 yazıyorum 11, 12, 12,111 gibi içinde 1 geçenlerin hepsi geliyor.
RE: Liste Kutusu Filtreleme - C*e*l*o*y*c*e - 06/12/2022
seçilen gelsin diyorsan
Like "" & [Formlar]![Form1]![Metin2] & ""
sonundaki gelmesin diyorsan
Like "*" & [Formlar]![Form1]![Metin2] & ""
baştaki gelmesin diyorsan
Like "" & [Formlar]![Form1]![Metin2] & "*"
bu şekilde * ları kaldırarak deneme yapın
RE: Liste Kutusu Filtreleme - macirercan - 06/12/2022
(06/12/2022, 15:29)C*e*l*o*y*c*e yazdı: seçilen gelsin diyorsan
Like "" & [Formlar]![Form1]![Metin2] & ""
sonundaki gelmesin diyorsan
Like "*" & [Formlar]![Form1]![Metin2] & ""
baştaki gelmesin diyorsan
Like "" & [Formlar]![Form1]![Metin2] & "*"
bu şekilde * ları kaldırarak deneme yapın
Eyvallah oluyor lakin kutucuk boş olunca liste kutusu yine boş geliyor. Tüm kayıtlar gelmiyor.
RE: Liste Kutusu Filtreleme - atoykan - 06/12/2022
Komut7'nini tıklanma olayında kodu aşağıdaki ile değiştirin
If IsNull(Metin2) Or Metin2 = "" Then
Me.Liste0.RowSource = "SELECT Tablo1.Kimlik, Tablo1.sayi, Tablo1.sayi2 FROM Tablo1;"
Else
Me.Liste0.RowSource = "SELECT Tablo1.Kimlik, Tablo1.sayi, Tablo1.sayi2 FROM Tablo1 WHERE (((Tablo1.sayi)=[Formlar]![Form1]![Metin2]));"
Me.Liste0.Requery
End Ifbu formunuzda textbox boş ise liste kutusuna tüm değerleri herhangi bir sayı var ise listboxta bu değerleri filtreleyerek listeler.