按键精灵变量循环几秒后跳出循环怎么做？
dimq(10)q(0)="FFFDD2"q(1)="FFFDED"q(2)="FFFDD5"q(3)="FFFCEE"q(4)="FEF5E1"q(5)="FFFFB3...
dim q(10)
q(0)="FFFDD2"
q(1)="FFFDED"
q(2)="FFFDD5"
q(3)="FFFCEE"
q(4)="FEF5E1"
q(5)="FFFFB3"
q(6)="FEE8BA"
q(7)="FFFFE5"
q(8)="FFFF77"
q(9)="FFFDD1"
Do
For i=0 to 9
FindColor 12,35,1024,600,q(i),intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
LeftClick 1
call a()
Exit For
End If
Next
Loop
Sub a()
End Sub 展开
q(0)="FFFDD2"
q(1)="FFFDED"
q(2)="FFFDD5"
q(3)="FFFCEE"
q(4)="FEF5E1"
q(5)="FFFFB3"
q(6)="FEE8BA"
q(7)="FFFFE5"
q(8)="FFFF77"
q(9)="FFFDD1"
Do
For i=0 to 9
FindColor 12,35,1024,600,q(i),intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
LeftClick 1
call a()
Exit For
End If
Next
Loop
Sub a()
End Sub 展开
1个回答
展开全部
dim q(10)
q(0)="FFFDD2"
q(1)="FFFDED"
q(2)="FFFDD5"
q(3)="FFFCEE"
q(4)="FEF5E1"
q(5)="FFFFB3"
q(6)="FEE8BA"
q(7)="FFFFE5"
q(8)="FFFF77"
q(9)="FFFDD1"
Do
time1=Now()
For i = 0 To 9
time2 = Now()
FindColor 12,35,1024,600,q(i),intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
LeftClick 1
call a()
Exit For
End If
Next
Loop until time2-time1 < 10
做一个时间记录在里面即可
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
