本页面由网页陶吧 龙犊收集整理 时间是: 02/05/06 下午 05:58:59.
页面地址: vsfctTimer.htm
标题: Timer 函数  •  文件大小: 1460  •  更新时间: Sun, 05 Feb 2006 03:21:34 GMT

Timer 函数

返回午夜 12 时以后已经过去的秒数。

Timer

说明

下面的例子使用 Timer 函数来确定 For...Next 循环 N 次所需的时间:

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

要求

版本 5

请参阅

Randomize 语句