Timer Function
Returns the number of seconds that have elapsed since 12:00 AM (midnight).
Syntax
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
Requirements
Change History
Date |
History |
Reason |
|---|---|---|
April 2009 |
Modified example. |
Customer feedback. |