merhaba
yaptığım çalışmada iki tarih arasında sorgu yaptım.Fakat gelen listedeki kayıt sayısını bir türlü alamadım.
=Say ([...])komutu işe yaramadı.yardımcı olursanız sevinirim..
=Say([HASTAKODU]) şeklinde deneyin
deniyorum ama olmuyor siz örnekte yapıp gönderebilirmisiniz..
kodu bu şekilde değiştir
Private Sub Komut8_Click()
Dim say As Integer
Liste0.Requery
Liste0.Visible = True
Metin9.Visible = True
Metin11.Visible = True
Etiket12.Visible = True
Me.Metin2 = Me.Liste0.ListCount
End Sub
Tablonuzdaki tüm kayıtların sayısını bulmak için Metin Kutusunun Denetim Kaynağı'na:
Kod:
=DCount("[HASTAKODU]";"HASTA")
Liste kutusunun içeriğini saydırmak için:
Kod:
Liste0.Requery
Me.Metin2.Value = Liste0.ListCount
Metin2.Requery
Bunu formunuzun açıldığında, güncelleştirildiğinde olaylarına koyun.
Güncelleştirilecek komut düğmesi varsa ona da ekleyin...
Kolay gelsin...
Sayın Esrefigit,
Çok teşekkür ederimm.Sorun çöüzüldü.yalnız şöyle bir sorun var kayıt sayısının bir fazlasını gösteriyor.Yani listedeki sayıdan bir fazla.(kendim saydım)Bunu neden yapabilir...