Timer 函數(shù)

返回午夜 12 時(shí)以后已經(jīng)過去的秒數(shù)。

Timer

說明

下面的例子使用 Timer 函數(shù)來確定 For...Next 循環(huán) N 次所需的時(shí)間：

Function TimeIt(N)  Dim StartTime, EndTime  StartTime = Timer  For I = 1 To N  Next  EndTime = Timer  TimeIt = EndTime - StartTimeEnd Function