VB SLEEP 函数用法

VB SLEEP 函数用法

1、sleep不是vb自带的函数，属于windows API函数。
2、vb要使用sleep函数，需要先定义定义windows API sleep函数。
3、可以使用vb自带的API文本浏览器查找到sleep函数的定义方法。
4、示例：

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Dim t As Single

t = Timer
Sleep 1000 '调用sleep
MsgBox Timer - t '验证结果

End Sub

text1=“11”是赋值，不是显示
这段代码表示隔1秒给text1和text2赋值。
你把代码写全了，显示部分有没有sleep(1000) ？

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
Text1 = "11"
DoEvents
Sleep 2000
Text2 = "22"
End Sub

text1=val(text1) +11

你将语句改为
sleep(1000)
text1="11"
DoEvents
DoEvents
DoEvents
sleep(1000)
DoEvents
text2="22"
DoEvents
DoEvents
DoEvents
再试下,应该就可以了,因为sleep API函数这时会消耗应用程序全部的运行时间,你的文本框虽然已经获得了数据,但是在文本框中显示,却是窗体和控件重画需要做的工作,这个时间被SLEEP函数给占用了,因此直到最后才会被显示出来