Visual Basic Scripting Edition | 語(yǔ)言參考 |
返回午夜 12 時(shí)以后已經(jīng)過(guò)去的秒數(shù)。
Timer
下面的例子使用 Timer 函數(shù)來(lái)確定 For...Next 循環(huán) N 次所需的時(shí)間:
Function TimeIt(N)
Dim StartTime, EndTime
StartTime = Timer
For I = 1 To N
Next
EndTime = Timer
TimeIt = EndTime - StartTime
End Function