按键精灵手机版抓图如果抓不到就等待3秒继续抓图要怎么写

2024-11-18 02:48:09
推荐回答(1个)
回答1:

Dim intX,intY,flag
flag = true
While (flag)
FindPic 149,279,400,424,"Attachment:截图1.png","000000",0,1,intX,intY
If intX > - 1 And intY > - 1 Then
flag = False //找到图置为false,停止循环
TracePrint intX
TracePrint intY
Delay 500
Tap intX, intY
End If
Delay 3000
Wend