Palauttaa tietotyypin Yksinkertainen, joka edustaa keskiyön jälkeen kuluneita sekunteja.
Syntaksi
Ajastin
Huomautuksia
Microsoft Windowsissa Ajastin-funktio palauttaa sekunnin murtoluvut. Macintoshissa ajastimen tarkkuus on yksi sekunti.
Esimerkki kyselystä
Lauseke |
Tulokset |
SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
Palauttaa keskiyöstä kuluneen sekunnit järjestelmän ajan perusteella ja näkyy Sarakkeessa SecondsPast. |
VBA-esimerkki
Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Tässä esimerkissä käytetään Ajastin-funktiota sovelluksen keskeyttämiseen. Esimerkissä käytetään myös DoEvents-funktiota muihin prosesseihin keskeytysvaiheessa.
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