请问怎样让程序休眠一定时间？？

[lg9wowo]

请问怎样让程序休眠一定时间？？

[minajo21]

用sleep做延时

[minajo21]

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

'This project needs a button
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
Me.Caption = "Your system will sleep 5 sec."
'Sleep for 5000 milliseconds
Sleep 5000
Me.Caption = ""
End Sub
Private Sub Form_Load()
Me.Caption = ""
Command1.Caption = "Sleep ..."
End Sub

[Sean918]

晚上．．．　VB　版只有一双　大眼睛　在到处晃悠了．．．

[Rozre]

up

哈哈！幽默！