Daje tip podataka Jednostruki koji predstavlja broj sekundi proteklih od ponoći.
Sintaksa
Timer
Napomene
U operativnom sistemu Microsoft Windows funkcija Tajmer vraća razlomke u sekundi. Na Macintosh računaru, rezolucija tajmera je jedna sekunda.
Primer upita
|
Izraz |
Rezultati |
|
SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
Daje broj sekundi proteklih od ponoći na osnovu sistemskog vremena i prikazuje se u koloni SecondsPast. |
VBA primer
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Ovaj primer koristi funkciju Tajmer za pauziranje aplikacije. Primer takođe koristi DoEvents za dobit u drugim procesima tokom pauze.
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
