Timer
The Timer event is used to track elapsed time or can be display as a stopwatch in a dialog. The timers value is the number of seconds from midnight.
Sub Main Dim TS As Single Dim TE As Single Dim TEL As Single TS = Timer MsgBox "Starting Timer" TE = Timer TT = TE - TS Print TT End Sub