添加一个名称为 “nWait” 数据类型为 “INT” 的时长内部变量，以秒为单位，新建一个脚本名称为 “Delay”(为SUB DELAY(DelayTime)):
Dim StartTime, StopTime, i

StartTime = Now
StopTime = StartTime + DelayTime/24/3600

Do
If i = 0 Then

i = i + 1
End If

Loop Until Now >= StopTime

SetBit SmartTags("a") //执行完延时后的动作，根据需要自己修改。

然后在程序中调用这个DELAY（nWait)就可以了。