Palauttaa tietotyypin Yksinkertainen, joka edustaa keskiyön jälkeen kuluneita sekunteja.
Syntaksi
Ajastin
Huomautuksia
Microsoft Windowsin ajastin-funktio palauttaa sekunnin murto-osat. Macintoshissa ajastimen tarkkuus on yksi sekunti.
Kyselyesimerkki
| Lauseke | Tulokset |
|---|---|
| SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); | Palauttaa keskiyön jälkeen kuluneiden sekuntien määrän järjestelmän ajan perusteella. Näkyy sarakkeessa Sekunnit.Myöheys. |
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ä Ajastin-funktiota käytetään sovelluksen keskeyttämiseen. Esimerkissä käytetään DoEvents-funktioita myös muihin prosesseihin tauon aikana.
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