(19/12/2015, 20:02)SCavusoglu yazdı: Merhaba,
Kodu aşağıdaki şekilde değiştiriniz.
Kod:Private Sub Form_Load()
If DCount("s_goruldu", "tblsinif", "s_goruldu='HAYIR'") <= 0 Then
Me.lblBildirim.Caption = ""
End If
End Sub
Private Sub Form_Timer()
If DCount("s_goruldu", "tblsinif", "s_goruldu='HAYIR'") > 0 Then
Me.lblBildirim.Visible = Not Me.lblBildirim.Visible
Else
Me.lblBildirim.Caption = ""
End If
End Sub
Teşekkür ederim, yapmak istediğim de tam buydu aslında. İlgili kodları gerekli yerlere ekledim ama form açıldığında INCELENECEK URUN YOK bildirimini bir türlü alamıyorum. Bir de değer değiştirince yine bildirimleri karıştırıyor.
Bir de timer kontrolü etiketin yanıp sönme hızı yani 300 ile aynı mı oluyor? Formun altta bulunan listboxurunler liste kutusunun da yenilenmesini sağlamak mümkün mü?