Atgriež Single vērtību, kas norāda kopš pusnakts pagājušo sekunžu skaitu.
Sintakse
Timer
Piezīmes
Operētājsistēmā Microsoft Windows funkcija Timer atgriež sekundes daļskaitļus. Macintosh sistēmā taimera izšķirtspēja ir viena sekunde.
Vaicājuma piemērs
| Izteiksme | Rezultāti |
|---|---|
| SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); | Atgriež kopš pusnakts pagājušo sekunžu skaitu, pamatojoties uz sistēmas laiku, un parāda kolonnā SecondsPast. |
VBA piemērs
Piezīme
Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.
Šajā piemērā lietojumprogrammas pauzēšanai izmantota funkcija Timer . Piemērā DoEvents tiek izmantots arī, lai pauzes laikā piekāptos citiem procesiem.
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