Funkcija Timer

Pateikia reikšmę Viengubas, žyminčią nuo vidurnakčio praėjusių sekundžių skaičių.

Sintaksė

Timer

Pastabos

"Microsoft Windows" laikmačio funkcija pateikia sekundės trupmeninę dalį. "Macintosh", laikmačio skyra yra viena sekundė.

Užklausos pavyzdys

Reiškinys

Rezultatai

Pasirinkite laikmatis () kaip SecondsPast iš ProductSales grupės pagal laikmatį ();

Grąžina sekundžių skaičių, kuris praėjo nuo vidurnakčio pagal sistemos laiką ir rodo stulpelyje SecondsPast.

VBA pavyzdys

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje naudojama laikmačio funkcija, kad pristabdytumėte taikomąją programą. Pavyzdys taip pat naudoja " DoEvents ", kad būtų gaunami kiti procesai pauzės metu.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If

Pastaba:  Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Prašome mus informuoti, ar radote reikiamos informacijos. Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip nuoroda.

Taip pat žr.

Pasirinkite tinkamą funkciją DATE

Tobulinkite savo „Office“ į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ų.

×