level 4
akydy8
楼主
For 10000
Dim MyHour,MyVar
Rem startPosition
MyHour = Hour(Now)
MyMinute = Minute(Now)
if MyHour=11 and MyMinute=52 then
MoveTo 995,611
Delay 20
LeftClick 1
Delay 20
For 10000
MoveTo 92,60
Delay 20
LeftClick 1
Delay 800
IfColor 819, 450, "5E59FF", 0 Then
For 1000000
MoveTo 854,448
Delay 20
LeftClick 1
Delay 40
MoveTo 995,611
Delay 20
LeftClick 1
Delay 20
Next
End If
Next
End If
Delay 1
Next
脚本倒数第二行代码(延迟千之1秒)去掉,程序就不工作 ,为什么
2025年02月20日 06点02分
1
Dim MyHour,MyVar
Rem startPosition
MyHour = Hour(Now)
MyMinute = Minute(Now)
if MyHour=11 and MyMinute=52 then
MoveTo 995,611
Delay 20
LeftClick 1
Delay 20
For 10000
MoveTo 92,60
Delay 20
LeftClick 1
Delay 800
IfColor 819, 450, "5E59FF", 0 Then
For 1000000
MoveTo 854,448
Delay 20
LeftClick 1
Delay 40
MoveTo 995,611
Delay 20
LeftClick 1
Delay 20
Next
End If
Next
End If
Delay 1
Next
脚本倒数第二行代码(延迟千之1秒)去掉,程序就不工作 ,为什么