liste kutusu doluysa uyarı verme

arkadaşlar ekteki dosyada form1 içinde liste kutusu var sorgudan veri geliyor liste kutusu boş ise uyarı vermesini istiyorum..

bir sorum daha olacak başka bir projede tablodan sorgu oluşturdum tabloda tarih kısmına bir sorgu yapmak istiyorum girilen kayıtlarda en son tarih teki kayıtları görmek için nasıl bir sorgu oluşturmam gerekiyor..
mesela bugünün tarihi 13.08.2009
tarih kısmında enson kayıt tarihi 11.08.2009 ise bu tarihte yapılan kayıtları listelicem..

ustalar yardım ederlerse çok sevinirim.. şimdiden teşekkürler..

sayın new coo
soru soruyorsunuz,ancak verilen cevapları kontrol etmiyor,geri dönünüşüm yaparak sorunuzun cevabını alıp almadığınımızı yazmıyorsunuz lütfen verilen cevapları kontrol edin,
https://accesstr.net/konu-alt-formdaki-k...4#pid24744

1.
If Me.Liste0.ListCount <= 0 Then MsgBox "liste boş"

2.
Select * from tablo where tarih=(Select max(tarih) from tablo)

Sayın new_cooo;

Tablolarınızda tarih alanı gözükmüyor..

sn. C*E*L*O*Y*C*E
kusuru bakmayın bir kaçgündür pc de sorun olduğundan cevap veremedim..
asıl yapmak istediğim liste kutusu boş veya dolu ise uyarı vermesi
liste kutusunu sorgudan çektiriyorum..
boş ise yeşil boş değilse kırmızı mesela.. (Trafik lambası gibi olur)

Yukarıdaki cevapları denediniz ve işe yaramadı mı?