Svojstvo „TimerInterval“

Odnosi se na

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.

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