Dim tim1,tim2
tim1=now
tim2=now
Rem XX
KeyPress "1", 1
Delay 200
KeyPress "2", 1
Delay 200
If DateDiff("s",tim1,now) >= 2 Then
tim1=now
KeyPress "1", 1
Delay 200
End if
If DateDiff("s",tim2,now) >= 30 Then
tim2=now
KeyPress "2", 1
Delay 200
End if
goto xx
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024