Listbox' un boş olup olmadığını öğrenmek

[tamer42]

İyi bayramlar dilerim,

Listbox' un boş olup olmadığını öğrenmek için aşağıdaki kodu kazırladım yalnız hiç kayı yok iken yine "DOLU" mesajı verdi,
ListCount değeri hiç kayıt olmasa bile "1" değerini veriyor.

............
........
strSQL = strSQL & "WHERE (([PERSONEL].[ADI SOYADI]) Like '" & txtSearchString & "*') "

Me!Liste16.RowSource = strSQL
a = Me!Liste16.ListCount

If Not IsNull(Me!Liste16) Then
   MsgBox "DOLU"
     MsgBox a

   Else
    MsgBox "BOŞ"
   
End If

İyi Akşamlar.

 

[modalı]

Sayın tamer42,

Yarım saat önce buna benzer bir soruya cevap verdim. Hatta iki soruya. diğeri de buna benzerdi.

Sql cümlesini ADO ile kayıt olarak açın oradan araştırın dolu veya boş olduğunu.

İyi çalışmalar

 

[tamer42]

Sn Modalı ilginize teşekkür ediyorum,

Sql cümlesini ADO ile kayıt olarak açın oradan araştırın dolu veya boş olduğunu.

Bahsettiğiniz kodlar bunlar mıdır?

Private Sub cmdAra_Click()
Dim rs As New ADODB.Recordset
rs.Open "SELECT * FROM Kişiler WHERE SiraNo=" & txtAra & ";", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If rs.RecordCount = 0 Then
    MsgBox "İlgili Kayıt Yok", , "Uyarı"
Exit Sub
End If
Me.RecordsetClone.FindFirst "[SiraNo] = " & Me.txtAra
Me.Bookmark = Me.RecordsetClone.Bookmark
rs.Close
End Sub

İyi Günler, iyi haftalar.

 

[tamer42]

Merhabalar,

rs.Open "SELECT * FROM Kişiler WHERE SiraNo=" & txtAra & ";", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If rs.RecordCount = 0 Then
.......

Yukarıdaki kodu uyguladığımda " & txtAra & " tam değer olduğunda çalışıyor,

Yalnız

='*" & txtAra & "*'

txtAra içeren ifadeleri arattığımızda rs.RecordCount = 0 değerini veriyor.

İyi Çalışmalar.

 

[tamer42]

Merhabalar,

"*" yerine "%" yazınca sorun çözüldü,

... WHERE SiraNo Like '%" & txtAra & "%' ...

ben buradan başka birşey sorabilirmiyim? txtAra içeren ifadeleri arattığımızda bunun içerisinden bazı değerleri hariç tutabilirmiyiz?

Şöyle ki;
txtAra = "ab" olsun, içerisinde "ab" geçen değerleri listeletebiliyoruz,

bu listede içinde "c" geçenleri hariç tutabilirmiyiz.
Örnek:
1ab2 ---- al
c3ab ---- alma
ab4d ---- al
5cab ---- alma
6abc7 ---- alma
....
gibi...

İyi Çalışmalar dilerim.