VB中如何让程序暂停3秒

来源：百度知道 编辑：UC知道 时间：2024/09/18 04:15:42
如题，请大虾们帮帮忙啊！非常感谢！

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
Me.Caption = "暂停三秒"
'暂停三秒
Sleep 3000
Me.Caption = ""
End Sub
Private Sub Form_Load()
Me.Caption = ""
Command1.Caption = "暂停 ..."
End Sub

看看行不行