Proprietatea TimerInterval

Se aplică la

Puteți utiliza proprietatea TimerInterval pentru a specifica intervalul, în milisecunde, dintre evenimentele Cronometru de pe un formular. Lung în citire/scriere.

expresie.TimerInterval

expresie Obligatoriu. O expresie care returnează unul dintre obiectele din lista Se aplică la.

Observații

Setarea de proprietate TimerInterval este o Valoare întreg lung cuprinsă între 0 și 2.147.483.647.

Puteți seta această proprietate utilizând foaie de proprietăți formularului, un macrocomandă sau cod Visual Basic for Applications (VBA).

Pentru a rula cod VBA la intervalele specificate de proprietatea TimerInterval, amplasați codul în procedura de eveniment Cronometru a formularului. De exemplu, pentru a reinteroga înregistrările la fiecare 30 de secunde, amplasați codul pentru a reinteroga înregistrările în procedura de eveniment Cronometru a formularului, apoi setați proprietatea TimerInterval la 30000.

Exemplu

Următorul exemplu arată cum să creați un buton care clipește intermitent pe un formular prin afișarea și ascunderea unei pictograme pe buton. Procedura eveniment Încărcare a formularului setează proprietatea TimerInterval a formularului la 1000, pentru ca afișarea pictogramei să fie comutată la fiecare 2 secunde.

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