Export (0) Print
Expand All

Timer Function

Updated: April 2009

Returns the number of seconds that have elapsed since 12:00 AM (midnight).

Timer

The following example illustrates the use of the Timer function.

Dim StartTime, EndTime, Elapsed

MsgBox "Click to start timer.", vbExclamation
StartTime = Timer

MsgBox "Click to end timer.", vbExclamation
Elapsed = Timer - StartTime

' This works only if midnight does not occur between
' the two clicks.
MsgBox "Elapsed Seconds: " & Elapsed, vbInformation

Date

History

Reason

April 2009

Modified example.

Customer feedback.

Community Additions

Show:
© 2014 Microsoft