Ypatybė Laiko intervalas (TimeInterval)

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Taikoma

Objektui Form

Ypatybę Laiko intervalas (TimeInterval) galite naudoti norėdami milisekundėmis nustatyti intervalą tarp formos Laikmačio (Timer) įvykių. Skaityti/rašyti skirtas Ilgasis sveikasis skaičius.

išraiška.TimerInterval

išraiška Būtina. Išraiška, kuri grąžina vieną iš sąraše Taikoma esančių objektų.

Pastabos

TimerInterval ypatybės parametras yra į Ilgasis sveikasis skaičius reikšmę nuo 0 iki 2,147,483,647.

Šią ypatybę galite nustatyti naudodami formos ypatybės lapas"," makrokomanda"arba" Visual Basic for Applications (VBA) kodas.

Pastaba : Naudojant VBA, ypatybė Laiko intervalas (TimeInterval) nustatoma formos įvykyje Įkelti.

Norėdami paleisti VBA kodą intervalais, nurodytais ypatybės Laiko intervalas (TimeInterval), įkelkite kodą į formos įvykio procedūrą Laikmatis (Timer). Pavyzdžiui, jei norite kas 30 sekundžių vykdyti pakartotinę užklausą, perkelkite pakartotinio įrašų užklausos vykdymo kodą į formos įvykio procedūrą Laikmatis (Timer) ir nustatykite ypatybės Laiko intervalas (TimeInterval) reikšmę 30000.

Pavyzdys

Šiame pavyzdyje rodoma, kaip formoje sukurti mirksintį mygtuką, kad jame būtų rodoma ir paslepia,a piktograma. Formos įvykio procedūra Įkelti (Load) nustato formos ypatybės Laiko intervalas (TimeInterval) reikšmę 1000, kad piktogramos rodymas būtų perjungiamas kartą per sekundę.

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

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×