如何调用VBS里的Sleep？
可以这样声明Sleep函数
Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
然后调用此函数。

请问如何调用VBS里的Sleep？
我写如下代码但运行出错。对象不支持该属性或方法。

Option Explicit

Private Sub Form_Click()
Dim w As Object
Set w = CreateObject("WScript.Shell")
w.sleep 5000
MsgBox "延时结束"

End Sub


[解决办法]
Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
放在通用里。


Private Sub Form_Click()
w.sleep 5000
MsgBox "延时结束"

End Sub

[解决办法]
Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
放在通用里。


Private Sub Form_Click()
sleep 5000
MsgBox "延时结束"

End Sub

[解决办法]
Sleep是标准API，直接使用：Sleep(1000)'1000毫秒
[解决办法]
声明
调用
[解决办法]
上面的都没仔细看，是VBS，不是VB

正确的：
WScript.Sleep 2000