Skip to main content

AccessTr.neT


Textbox Boş Olanları Sayma

Textbox Boş Olanları Sayma

#2
Eğer Texbox ların nameleri TextBox ile başlıyorsa aşağıdaki kod işinize yaraya bilir.
Kod:
Private Sub CommandButton1_Click()
For i = 1 To 47
If Controls("TextBox" & i).Value = "" Then
say = say + 1
End If
Next
Controls("TextBox49").Value =say
End Sub

Son Düzenleme: 01/12/2020, 12:54, Düzenleyen: alicimri.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Textbox Boş Olanları Sayma - Yazar: malatyalı - 01/12/2020, 09:13
RE: Textbox Boş Olanları Sayma - Yazar: alicimri - 01/12/2020, 12:48
RE: Textbox Boş Olanları Sayma - Yazar: malatyalı - 07/12/2020, 13:57
RE: Alt Form - Yazar: berduş - 01/12/2020, 16:26
Task