查人人中国名人网重庆dhl国际快递电话:vb中获得执行时间，（急）
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/10 13:06:47
例如：我要创建100000次1+1，并且在执行完了之后获得这次执行所用的时间。。。，请问代码如何写
Private Sub Command1_Click()
a = Timer---------timer计算从午夜到现在一共过了多少秒.
For i = 1 To 100000
c = c + 1
Next i
b = Timer - a
Print b
End Sub
在程序开始是记录一个时间,程序结束时再记录一个时间
记录时间你直接在开始时调用Win32 API中的GetTickCount函数，获取一个DWORD值，然后结束时你再调用这个函数再获取一个DWORD值，两值相减就是最终的时间了，单位为ms。