vb-timer物件的interval设为1

题目

vb-timer物件的interval设为1
dim j as integer
timer1.interval=1
Private Sub Timer1_Timer()
Label1.Caption = "经过时间:" & Int(j / 1000) & "秒" & j Mod 1000 & "毫秒"
j = j + 1
End Sub
我观察上面程式码的执行结果,发现它需要好几倍的时间才会增加一秒…
为什麼会产生这种错误?

答案

Timer1_Timer
底层原因,这个事件每秒最多只能触发大约18次（根据机器不同而不同）
所以不要迷信这个函数,这玩意儿不准的