Timer-funktio

Palauttaa tietotyypin Yksinkertainen, joka edustaa keskiyön jälkeen kuluneita sekunteja.

Syntaksi

Ajastin

Huomautuksia

Microsoft Windowsissa ajastinfunktio palauttaa murtolukuosat sekunnissa. Macintoshissa ajastimen tarkkuus on yksi sekunti.

Kyselyesimerkki

Lauseke

Tulokset

SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer();

Palauttaa keskiyöstä lähtien kuluneiden sekuntien määrän 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ä sovellus keskeytetään ajastintoiminnon avulla. Esimerkissä käytetään myös DoEvents-prosessia muihin prosesseihin taukojen 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

Katso myös

Oikean päivämääräfunktion valinta

Tarvitsetko lisäohjeita?

Kehitä Office-taitojasi
Tutustu koulutusmateriaaliin
Saat uudet ominaisuudet ensimmäisten joukossa
Liity Office Insider -käyttäjiin

Oliko näistä tiedoista hyötyä?

Kiitos palautteesta!

Kiitos palautteestasi! Näyttää siltä, että Office-tukiedustajamme avusta voi olla sinulle hyötyä.

×