Kaç Adet Kayıt Olduğunu Bulma

1 2
15/06/2022, 22:17

alikagan

hayırlı akşamlar arkadaşlar,
aşağıdaki formda metin kutularından bazıları dolu
dolu olan kayıtların kaç tane olduğu kod ile nasıl bulunabilir acaba?
[img]
[/img]
15/06/2022, 22:32

berduş

bu tür durumlarda genelde 2 farklı yöntem kullanılır
1 - ilgili metin kutularına seri numaralı isimler verirsiniz ve for döngüsüyle denetlersiniz bir önceki konunuzda kullanılan yöntem
2 - ilgili metin kutularına belli bir im/tag verirsiniz ve
For Each ctl In Me.Controls
If ctl.Tag = "birşey" Then t = t + 1
Next ctl
benzeri kodlarla işlem yapabilirsiniz
15/06/2022, 22:57

alikagan

im değeri verdim,
4 metin kutusu dolu olduğu halde 6  sonucu verdi ama
16/06/2022, 00:12

berduş

benim yazdığım kod sadece örnekti o kod zaten im değeri olanları sayar sizin ayrıca ilgili kutu dolu mu onu da kontrol etmeniz gerek
16/06/2022, 11:09

alikagan

merhaba,
tag değerini 
aşağıdaki gibi kontrol ettirmeye çalıştım ama olmadı, yine tüm tag alanlarının toplam sayısını verdi,  
kontrolüm yanlış mı?

For Each ctl In Me.Controls
If ctl.Tag = "birşey" And Not IsNull(ctl.Tag) Then T = T + 1
Next ctl
16/06/2022, 12:20

berduş

(16/06/2022, 11:09)alikagan yazdı: Not IsNull(ctl.Tag)
bu kod tag degeri boş değilse anlamına gelir sizin nesnenin değerini kontrol etmeniz gerekiyor

For Each ctl In Me.Controls
If ctl.Tag = "birşey" Then If Len(ctl & "") > 0 Then T = T + 1
Next ctl
kodu işinize yarayabilir ama bence tag/Im yerine ilgili metin kutularına sıralı isim vermeniz daha verimli olur

For Each ctl In Me.Controls ile formdaki tüm nesneler(sekmeler, etiketler, çerçeveler, düğmeler......) kontrol edilir oysa sıralı isimlendirmede sadece kontrol edilmesi gerekenler
1 2