Question

VB中如何让程序暂停3秒

如题，请大虾们帮帮忙啊！非常感谢！

Answer 1

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

看看行不行