可以用Sleep函数,以下是一个例子:Private Declare Sub Sleep Lib "Kernel32" (ByVal dwMilliseconds As Long)Private Sub Command1_Click()Sleep 3000Print "VB暂停3秒例子"End Sub...
Private Declare Sub Sleep Lib "Kernel32" (ByVal dwMilliseconds As Long)Private Sub Command1_Click()Sleep 3000Print "VB暂停3秒例子"End Sub -------------------------------------...