Svojstvo TimerInterval

Odnosi se na

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).

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