Uygulandığı öğe
|
Form Nesnesi |
Formdaki Timer olayları arasında kalan süreyi milisaniye cinsinden belirtmek için TimerInterval özelliğini kullanabilirsiniz. Okuma/yazma Uzun.
ifade.TimerInterval
ifade Gerekli. Uygulandığı Öğe listesindeki nesnelerden birini döndüren ifade.
Notlar
TimerInterval özelliği ayarı, 0 ile 2.147.483.647 arasında bir Uzun Tamsayı değeridir.
Formdaki özellik sayfası, makro veya Visual Basic for Applications (VBA) kodu kullanarak bu özelliği ayarlayabilirsiniz.
Not: VBA kullanıldığında, TimerInterval özelliğini formun Load olayında ayarlarsınız.
VBA kodunu TimerInterval özelliği tarafından belirtilen aralıklarla çalıştırmak için, kodu formun Timer olay yordamına yerleştirin. Örneğin, kayıtları 30 saniyede bir yeniden sorgulamak için, kayıtları yeniden sorgulama kodunu formun Timer olay yordamına yerleştirin ve ardından TimerInterval özelliğini 30000 değerine ayarlayın.
Örnek
Aşağıdaki örnekte, düğme üzerinde bir simgeyi görüntüleyip gizleyerek formda yanıp sönen bir düğme oluşturma işlemi gösterilir. Formun Load olay yordamı formun TimerInterval özelliğini 1000 değerine ayarladığından, simge görüntüsü her saniyede bir değişir.
Sub Form_Load()
Me.TimerInterval = 1000
End Sub
Sub Form_Timer()
Static intShowPicture As Integer
If intShowPicture Then
' Show icon.
Me!btnPicture.Picture = "C:\Icons\Flash.ico"
Else
' Don't show icon.
Me!btnPicture.Picture = ""
End If
intShowPicture = Not intShowPicture
End Sub
