Odnosi se na
|
Objekat obrasca |
Možete da koristite svojstvo TimerInterval da biste naveli interval u milisekundama između događaja tajmera u obrascu. Čitanje/pisanje dugačko.
expression.TimerInterval
expression Obavezno. Izraz koji daje jedan od objekata sa liste „Odnosi se na“.
Primedbe
Postavka svojstva TimerInterval je vrednost dugačkog celog broja između 0 i 2.147.483.647.
Ovo svojstvo možete da podesite pomoću list svojstva, makro ili Visual Basic for Applications (VBA) koda obrasca.
Napomena: Kada koristite VBA, postavljate svojstvo TimerInterval u događaj Učitavanje obrasca.
Da biste pokrenuli VBA kôd u intervalima koje navodi svojstvo TimerInterval, stavite kôd u proceduru događaja Tajmer obrasca. Na primer, da biste ponovili upit zapisa svakih 30 sekundi, stavite kôd za ponovni upit zapisa u proceduru događaja Tajmer obrasca, a zatim postavite svojstvo TimerInterval na 30000.
Primer
Sledeći primer pokazuje kako se kreira trepćuće dugme u obrascu prikazivanjem i skrivanjem ikone na dugmetu. Procedura događaja Učitavanje obrasca postavlja svojstvo TimerInterval obrasca na 1000 tako da se prikaz ikone uključuje jednom u sekundi.
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
