Vráti hodnotu typu Single, ktorá predstavuje počet sekúnd, ktoré uplynuli od polnoci.
Syntax
Timer
Poznámky:
V systéme Microsoft Windows funkcia Časovač vráti zlomkové časti sekundy. V počítačoch Macintosh je rozlíšenie časovača jedna sekunda.
Príklad dotazu
|
Výraz |
Výsledky |
|
SELECT Časovač() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
Vráti počet sekúnd, ktoré uplynuli od polnoci na základe systémového času a zobrazuje sa v stĺpci SecondsPast. |
Príklad jazyka VBA
Poznámka: Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.
V tomto príklade je funkcia Časovač použitá na pozastavenie aplikácie. V príklade sa tiež používa funkcia DoEvents na využitie iných procesov počas pozastavenia.
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
