按鍵精靈找不到圖跳過怎麼寫，按鍵精靈找圖，找不到時執行命令怎麼寫

FindPic 0,0,2000,2000,"Attachment：你要找的圖片.bmp",0.9,intX,intY

//0.0.2000.2000 是屏幕視窗大小，若比2000大則按全視窗處理，範圍控制越小，搜尋速度越快！

If intX > 0 And intY > 0 Then

//如果找到圖片，會反饋座標值intX和intY，如果值大於0，證明圖片找到了

//此處執行找到圖片後的操作，沒命令視爲無操作（一般無操作建議加點延時毫秒即可，例如300毫秒）

Else

//找不到圖片，就否則執行這裏的命令

End If

//判斷結束

我來回答你問題吧！

首先，你用了兩個無限循環，沒必要

1、Rem bj----Goto bj

2、i = 0

While i=0

Wend

第二個問題，你的i在中間變了三次，其實變了一次後，到第三張找圖後的代碼就會跳出了。沒必要變這多次。可能你是用來計數吧。那就沒所謂。

第二個是如何解決的問題。你可以用

for i=0 to j

next

這種語句來搜，就可以搜不了就跳出了，到第二，第三張圖了。

最後一點，其實你在每個MoveTo intX + 0, intY + 0

後面加個+0 也是多餘的代碼吧。

這是我幫你修改的代碼

Dim i,j

Rem bj

i = 0

//j是設搜圖的次數

j=2

For i=0 to j

FindPic 272,47,619,494,"Attachment:1.bmp",0.9,intX,intY

If intX > 0 And intY > 0 Then

MoveTo intX , intY

LeftClick 1

End If

Next

Delay 3000

For i=0 to j

FindPic 272,47,619,494,"Attachment:2.bmp",0.9,intX,intY

If intX > 0 And intY > 0 Then

MoveTo intX, intY

LeftClick 1

End If

Next

Delay 3000

For i=0 to j

FindPic 272,47,619,494,"Attachment:3.bmp",0.9,intX,intY

If intX > 0 And intY > 0 Then

MoveTo intX, intY

LeftClick 1

Delay 3000

End If

Next

Goto bj

希望能解決你的問題。

既然是限時找圖 那麼你找10次即可

在找圖裏面加個判斷 如果找到則跳出循環

如果沒找到也沒事 就循環10次找圖而已 不會死循環

然後點擊命令加個判斷

如果沒找到圖就不執行點擊命令 那樣也不會有影響了

代碼如下

vb">For 10

Delay 300

FindPic 0,0,1440,900,"Attachment:1.bmp",0.9,tX,tY

If tX>0 Then

Exit For

End If

Next

Delay 1000

If tX>0 Then

MoveTo tX,tY

Delay 300

LeftClick 1

End If

這代碼我有即視感，前段時間也有問我這樣的代碼。

我給你加段判斷代碼就好了，你需要他判斷多長時間呢？幾秒還是隻判斷一次？

把下面代碼替換你需要判斷圖三的那段就好了，>= 3是檢測三秒，更改數字就可以更改檢測的時間，如果只需要檢測一次，那麼只需要Do到Loop中間的代碼。

Z = time

Do

FindPic 0,0,414,325,"Attachment：圖3.bmp",0.9,intX,intY

If intX > 0 And intY > 0 Then

Delay 1200

MoveTo 488, 712

LeftClick 2

Delay 700

SayString "你好"

Delay 700

KeyPress "Enter", 1

Delay 700

End If

Loop Until DateDiff("s", Z, time) >= 3