安卓按键精灵,定时启动
发布网友
发布时间：2022-04-23 01:09
共2个回答
热心网友
时间：2023-10-09 19:40
Dim 时间,定时1,定时2
Do
Delay 100
Call 时间检测()
Loop
Sub 时间检测
日期和时间=Plugin.Sys.GetDateTime()
nyr1=Split(日期和时间," ")
年月日=nyr1(0)
年月日1=Split(年月日,"-")
年=年月日1(0)
月=年月日1(1)
日=年月日1(2)
时钟=Split(日期和时间," ")
sz=时钟(1)
sz1=Split(sz,":")
时=sz1(0)
分=sz1(1)
时间=时&分
Delay 1000
ds="02:52"
ds1 =Split(ds,":")
ds2 =ds1(0)
ds3 =ds1(1)
定时1 =ds2&ds3
Do
If 时间=定时1 Then
Thread.Stop (a1)
TracePrint "挂机关闭.."
Delay 3000
a5 = Thread.Start(主线任务)
Delay 1000
TracePrint "主线任务启动等待结束.."
Thread.Wait (a5)
TracePrint "主线任务结束准备挂机,"
Delay 1000
a1 = Thread.Start(挂机打怪)
TracePrint "挂机开启.."
Delay 1000
Exit Do
Else
Delay 500
Exit Do
End If
Loop
End Sub
看上去有点懵，我只会这样，能精简你自己精简吧
热心网友
时间：2023-10-09 19:41
我告诉你为什么，你MID函数取8位字符，Now函数包括年月日时分秒,而判断比较只有5位字符，你说两个字字符串会相等吗？
