[已解决]延时代码怎么写？

事后诸葛亮 · 发表于 2011-4-22 10:13

想在一段有循环功能的代码中加入一个延时语句
就是在3秒后执行下一个循环。
这个延时代码怎么写？

最佳答案

wayy

2011-4-22 10:21

本示例显示一条消息，用以表明是否经过 10 秒钟。

If Application.Wait(Now + TimeValue("0:00:10")) Then
MsgBox "Time expired"
End If

wayy · 发表于 2011-4-22 10:21

wait

wayy · 发表于 2011-4-22 10:21

本示例显示一条消息，用以表明是否经过 10 秒钟。

If Application.Wait(Now + TimeValue("0:00:10")) Then
MsgBox "Time expired"
End If

yuanlong1980 · 发表于 2011-4-22 11:11

wayy正确

yuanlong1980 · 发表于 2011-4-22 11:12

wayy正确

事后诸葛亮 · 发表于 2011-4-22 11:27

谢谢啦呵呵

		自动登录	找回密码
密码			注册