Returnerer et flyttall som representerer antall sekunder siden midnatt.
Syntaks
Timer
Merknader
I Microsoft Windows returnerer Tidtaker-funksjonen brøkdeler av et sekund. På Macintosh er tidtakeroppløsningen ett sekund.
Eksempel på spørring
| Uttrykk | Resultater |
|---|---|
| SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); | Returnerer antall sekunder siden midnatt, basert på systemtiden, og vises i kolonnen SecondsPast. |
VBA-eksempel
Obs!
I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.
Dette eksemplet bruker tidtakerfunksjonen til å stanse programmet midlertidig. Eksemplet bruker også DoEvents til å vike for andre prosesser i pausen.
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