按键精灵设置停止时间2
发布网友
发布时间：2023-10-29 02:45
共1个回答
热心网友
时间：2024-03-31 12:50
//定义变量；Dim RunTime,TimeNow
RunTime=CDate("00:30:00")//检测时间；Rem CheckTime
//取当前时间；TimeNow = CDate(CStr(Hour(Now))+":"+CStr(Minute(Now))+":"+CStr(Second(Now)))
MyVer = DateDiff("s",TimeNow,RunTime)
If MyVer<60
Goto Main
Else
Delay 50000
Goto CheckTime
EndIf
//调用要执行的代码；
Rem Main //停止功能可以把执行时间设置成所需要的时间即可。
