请问一下:按键精灵9 一段循环代码,如果每次循环没有在规定时间内完成就...
发布网友
发布时间：2024-10-05 18:16
共1个回答
热心网友
时间：2024-10-05 18:28
线程ID1 = BeginThread(子程序1)
shi=now
Rem q
Delay 1000
If DateDiff("s",shi,now)>=7 then
MessageBox "超过7秒没停止报警"
Else
Goto q
End If
Sub 子程序1()
For 2
Delay 1000
Next
End Sub
Sub OnThreadExit()
If GetThreadID=线程ID1 Then
MessageBox "子程序1线程停止，退出脚本"
ExitScript
End If
End Sub
