用这个sub,lngTime以毫秒为单位,如果要延迟0.3秒就输入:
Delayms 300
1.2秒延迟用碰手册
Delayms 1200
Public Sub Delayms(lngTime As Long)
Dim StartTime As Single
StartTime = Timer
Do While (Timer - StartTime) * 1000 <lngTime
DoEvents
Loop
End Sub
VBA
被称为宏语言,但是它决不能和宏划上等号,宏是一条指令或者笑宏几条指令的集合,控制WORD执行一连串的 *** 作。而VBA则是不折不扣的高级语言,通过面向对象的方法来实现不能实现的功能。在编辑一个宏的时候,visual basic 编辑器会将这个宏记录为一薯基个VBA过程。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)