Egenskaben Timerinterval

Gælder for

Du kan bruge egenskaben Timerinterval til at angive intervallet i millisekunder mellem Timer-hændelser i en formular. Læs/skriv Lang.

udtryk..Timerinterval

udtryk Påkrævet. Et udtryk, der returnerer et af objekterne på listen Gælder for.

Bemærkninger

Indstillingen for egenskaben Timerinterval er et langt heltal mellem 0 og 2.147.483.647.

Du kan indstille denne egenskab ved hjælp af formularens egenskabsark, en makro eller VBA-kode (Visual Basic for Applications).

Hvis du vil køre VBA-kode med intervaller, der er angivet af egenskaben Timerinterval , skal du placere koden i formularens Timer-hændelsesprocedure . Hvis du f.eks. vil genforespørge om poster hvert 30. sekund, skal du sætte koden til at forespørge på posterne i formularens Timer-hændelsesprocedure og derefter angive egenskaben Timerinterval til 30000.

Eksempel

I følgende eksempel vises det, hvordan du kan oprette en blinkende knap i en formular ved at vise og skjule et ikon på knappen. Formularens Indlæs-hændelsesprocedure angiver formularens Timerinterval-egenskab til 1000, så ikonvisningen skiftes én gang i sekundet.

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