用SLEEP函数 声明:Private Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 代码:sleep 1000'1000毫秒麻烦采纳,谢谢!