Odnosi se na
|
Objekt Form |
Svojstvo TimerInterval omogućuje vam da odredite vremenski razmak izražen u milisekundama između događaja brojača vremena na obrascu. To je svojstvo vrste Long za čitanje/pisanje.
expression.TimerInterval
expression Obavezno. Izraz koji vraća jedan od objekata na popisu Primjenjuje se na.
Napomene
Postavka svojstva TimerIntervaldugi je cijeli broj između 0 i 2 147 483 647.
To svojstvo možete postaviti pomoću lista svojstava obrasca, makronaredbe ili koda programa Visual Basic for Applications (VBA).
Napomena: Ako koristite VBA, svojstvo TimerInterval morate postaviti u događaju obrasca Load.
Da bi se VBA kod izvodio u vremenskim razmacima određenima svojstvom TimerInterval, umetnite kod u proceduru događaja Timer na obrascu. Da biste, primjerice, svakih 30 sekundi ponovno slali upit za zapise, umetnite kod za ponovno slanje upita za zapise u proceduru događaja Timer, a zatim postavite svojstvo TimerInterval na 30 000.
Primjer
U sljedećem je primjeru prikazano kako na obrascu stvoriti trepćući gumb prikazivanjem i sakrivanjem ikone na gumbu. Procedura događaja Load na obrascu postavlja svojstvo obrasca TimerInterval na 1000 da bi se prikaz ikone uključio/isključio jednom svake sekunde.
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
