Do
m = Minute(now)
s = Second(now)
Select case m
Case 1
If s = 15 Then
Call 点击
End If
Case 12
If s = 27 Then
Call 点击
End If
Case 15
If s = 6 Then
Call 点击
End If
Case 23
If s = 44 Then
Call 点击
End If
Case 29
If s = 15 Then
Call 点击
End If
End Select
Delay 1000
Loop
Sub 点击
MoveTo 8, 6
LeftClick 1
End Sub
判断时间获取分秒
搞掂了没,需要帮忙吗