在VB中如何让程序等待？

来源：百度知道 编辑：UC知道 时间：2024/06/24 05:14:13
例如下面三行代码：

01 MsgBox""
02
03 MsgBox""

我想执行01行后，等待10000毫秒执行03行，那么应在02行添加怎样的代码？
我用VBS中的wscript.sleep 10000试过，结果被报错，原因是“要求对象”。

用Timer计时器好点。比如说
你要间隔10秒弹，可以做个变量来判断弹的第几个
Dim iMsgNum integer
iMsgNum=0
计时器{
Select Case iMsgNum
case 0 第一个弹
case 1
..
End Select

}
这种比同步的Sleep要好，不会假死

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

然后在两个执行之间加入：
Sleep 10000
DoEvents