Funktionen Timer

Returner en enkelt, der repræsenterer det antal sekunder, der er forløbet siden midnat.

Syntaks

Timer

Bemærkninger

I Microsoft Windows returnerer funktionen timer brøkdele af et sekund. På din Macintosh er timer opløsningen et sekund.

Eksempel på forespørgsel

Udtryk

Resultat

Vælg timer () som SecondsPast fra ProductSales GROUP BY timer ();

Returnerer antallet af sekunder, der er forløbet siden midnat, baseret på systemklokkeslættet og vises i kolonnen SecondsPast.

VBA-eksempel

Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

I dette eksempel bruges funktionen timer til at afbryde programmet. I eksemplet bruges der også DoEvents til at give andre processer under pausen.

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

Bemærk!:  Denne side er oversat ved hjælp af automatisering og kan indeholde grammatiske fejl og unøjagtigheder. Det er vores hensigt, at dette indhold skal være nyttigt for dig. Var disse oplysninger nyttige? Her er artiklen på engelsk, så du kan sammenligne.

Se også

Vælge funktionen til højre dato

Udvid dine Office-færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×