Purpose
Returns the number of seconds that have elapsed since 12:00 AM. This is useful for benchmarking application operations.
Syntax
Timer
Example
Sub Main()
Dim timestart As Integer, timefinish As Integer
timestart = Timer
MsgBox("How fast can you click OK?")
timefinish = Timer
Print "It took you "; timefinish - timestart; "seconds to click OK"
End Sub
|