版主 你好
请问下 在VBA中 如何实现睡眠 ? 用sleep函数吗 ?
稍后工作人员给出回复
//仅供参考
在程序的Sub前加一句
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
就可以调用Sleep了
如下,可以暂停10秒.
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 10
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
其实意思差不多,VBA这块我之前没接触过,在网上帮楼主找了一下,看看这堆代码和for能不能同用来解决问题
newHour = Hour(Now())
newMinute = Minute(Now()) //上面两句这个应该是new了一个当前时间
newSecond = Second(Now()) + 10 //这句应该是当前时间停顿10s
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime //执行等待