AccessTr.neT

Tam Versiyon: Liste Kutusu Filtreleme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
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.
merhaba
Sorguyu şu şekilde değiştirp deneyin
Like "*" & [Formlar]![Form1]![Metin2] & "*"
Merhaba. O şekilde yaptığımda da 1 yazıyorum 11, 12, 12,111 gibi içinde 1 geçenlerin hepsi geliyor.
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
(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.
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 If

bu formunuzda textbox boş ise liste kutusuna tüm değerleri herhangi bir sayı var ise listboxta bu değerleri filtreleyerek listeler.
Sayfalar: 1 2