Win7-Prof / Office 2010 Sorunsuz Çalışıyor Ercan Hocam Eline Sağlık
İstediğim buna yakın ancak sizin yaptığınızdan 2 şey farklı olmalı;
1- yaptığınız program her satır için ayrı ayrı çalışıyor yani ilk satırda "var" yazısı varsa yanıp sönüyor. formu ilerlettiğimde 2. satıra geçiyor. benim istediğim her satırı aynı anda değerlendirmesi yani tablodaki herhangi bir satırda "var" yazıyorsa yanıp sönmesi. tek formda değerlendirmek
2- butonda yazı olarak "var" değil "uyarı" yazısının yanıp sönmesi
Teşekkürler
Evdeki bilgisayarıma geçince sorununuzu çözebilirim ancak, oluşacak gecikme için kusura bakmayın.
Kodu aşağıdaki ile değiştir.
If DCount("[Alan1]", "Tablo1", "[Alan3]='VAR'") Then
Me.Komut0.Visible = True
If Me.Komut0.Caption = "UYARI" Then
Me.Komut0.Caption = ""
Else
Me.Komut0.Caption = "UYARI"
End If
Else
Me.Alan3.SetFocus
Me.Komut0.Visible = False
End If
Butonun resim yazısını UYARI olarak değiştir.