UC知道DoEvents的问题
来源：百度知道 编辑：UC知道 时间：2024/09/25 08:33:55
VB中的一段代码:
Public Sub Delay_Timer(VTime As Single)
Dim n As Integer, M As Integer
For n = 0 To 100 * VTime
For M = 0 To 500
DoEvents
Next M
Next n
End Sub
在触发按钮时就执行Delay_Timer 20或Delay_Timer 10等.
我基本明白他是想做一个延时,再让程序继续向下执行,但是究竟是延时多长时间再往下走呢?
For n = 0 To 100 * VTime
For M = 0 To 500
这两个嵌套循环加上Delay_Timer 20中的"20"应该是构成了延时的总时间.但DOEVENTS一次是多久呢?
谢谢指点.
Public Sub Delay_Timer(VTime As Single)
Dim n As Integer, M As Integer
For n = 0 To 100 * VTime
For M = 0 To 500
DoEvents
Next M
Next n
End Sub
在触发按钮时就执行Delay_Timer 20或Delay_Timer 10等.
我基本明白他是想做一个延时,再让程序继续向下执行,但是究竟是延时多长时间再往下走呢?
For n = 0 To 100 * VTime
For M = 0 To 500
这两个嵌套循环加上Delay_Timer 20中的"20"应该是构成了延时的总时间.但DOEVENTS一次是多久呢?
谢谢指点.
DOEVENTS不是用来延时的，是让出CPU资源，让系统用CPU处理其他事情。
For M = 0 To 500 '这句时间太太太短了,可以忽略不计.
你把其他的时间算一下就明白了..