返回一个 Single,表示自午夜以来经过的秒数。
语法:Timer
Timer 函数返回秒的小数部分。
此示例使用 Timer 函数测量经过的时间。
Dim Start As Single, Finish As Single
Start = Timer ' Record start time.
' ... perform some operation ...
Finish = Timer ' Record end time.
Debug.Print "Elapsed: " & Finish - Start & " seconds"