//方法1
Do///插入要执行的代码Delay 10000////延时10秒钟Loop
//方法2
t = nowDo If datediff("s", t, now) >= 3 Then //s为秒,间隔大于等于3秒则执行代码,具体还有分钟n,小时h TracePrint "时间到" t=now //插入要执行的代码 End Ifloop