Applies ToAccess voor Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Geeft een waarde van het gegevenstype Enkel als resultaat die het aantal seconden aangeeft dat is verstreken sinds middernacht.

Syntaxis

Timer

Opmerkingen

In Microsoft Windows retourneert de timerfunctie fractionele gedeelten van een seconde. Op de Macintosh is de timerresolutie één seconde.

Queryvoorbeeld

Expression

Resultaten

SELECT Timer() AS SecondsPast FROM ProductVerkoop GROEP BY Timer();

Retourneert het aantal seconden dat is verstreken sinds middernacht op basis van de systeemtijd en wordt weergegeven in de kolom SecondsPast.

VBA-voorbeeld

Opmerking: In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.

In dit voorbeeld wordt de functie Timer gebruikt om de toepassing te onderbreken. In het voorbeeld wordt ook Gebruikgemaakt van DoEvents om tijdens de pauze toe te geven aan andere processen.

Dim PauseTime, Start, Finish, TotalTimeIf (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    EndEnd If

De juiste datumfunctie kiezen

Meer hulp nodig?

Meer opties?

Verken abonnementsvoordelen, blader door trainingscursussen, leer hoe u uw apparaat kunt beveiligen en meer.

Community's helpen u vragen te stellen en te beantwoorden, feedback te geven en te leren van experts met uitgebreide kennis.