+- 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ığı: Formda Boş Ve Dolu Alanların Sayılması (/konu-formda-bos-ve-dolu-alanlarin-sayilmasi.html)
Sayfalar:
1
2
Cvp: Formda Boş Ve Dolu Alanların Sayılması - tamer duran - 06/01/2019
Sağolun Hocam istediğim gibi oldu. Pratik olmaz derken Hocam çalıştı ama bilginiz olsun.
Cvp: Formda Boş Ve Dolu Alanların Sayılması - berduş - 07/01/2019
bu haliyle çalışır da benim kast ettiğim 40-50 alanı kontrol etmek isterseniz bu kodları 40-50 defa yazmak pratik olmaz
Cvp: Formda Boş Ve Dolu Alanların Sayılması - tamer duran - 07/01/2019
Yazarım ben Hocam çok sağolun.
Cvp: Formda Boş Ve Dolu Alanların Sayılması - ozanakkaya - 07/01/2019
Formun geçerli olduğunda olayına
Dim bosalan, dolualan As Integer
bosalan = 0
dolualan = 0
Dim ctrl As Control
For Each ctrl In Me
If ctrl.Tag = "1" Then
If Len(Nz(Controls(ctrl.Name).Value, "")) = 0 Then
bosalan = bosalan + 1
Else
dolualan = dolualan + 1
End If
End If
Next ctrl
Me.Metin29 = dolualan
Me.Metin32 = bosalankodunu kullanabilirsiniz. Sayım yapılacak metin kutusunun im özelliğine 1 yazılması yeterli.
Cvp: Formda Boş Ve Dolu Alanların Sayılması - tamer duran - 07/01/2019
Ozanakkaya bey mesajınızı yeni gördüm ve uyguladım . Sizin örneğiniz de Haliliyas Beyin cevabı gibi çok işime yaradı , sağolun. Çok teşekkür ederim.