找不到图片 [复制链接]

import "d:\obj.vbs"
Set dm = New dmsoft'创建对象
dm_ret = dm.SetPath("d:\")
jineng = array("枪械射击","温压弹","干冰弹","电磁穿刺","装甲车","高能射线","制导激光","冰雹发生器","跃迁电子","无人机冲击","燃油弹","旋风加农","压缩气刃","空投轰炸")
Rem 开始
Do
dm_ret = dm.FindPic(14,342,560,742,"2.bmp","000000",0.9,0,intX,intY)
If intX >= 0 and intY >= 0 Then
Call 找图(jineng(Form1.aComboBox1.ListIndex))
Call 找图(jinengForm1.bComboBox2.ListInde))
Call 找图(jineng(Form1.cComboBox3.ListIndex))
Call 找图(jineng(Form1.dComboBox4.ListIndex))
End If
Loop
Sub 找图(路径)
dm_ret = dm.FindPic(14,342,560,742,路径&".bmp","000000",0.8,0,intX,intY)
If intX >= 0 and intY >= 0 Then
技能=Replace(路径,".bmp","")
TracePrint "选择" & 路径 & Now()
dm.MoveTo intX, intY
dm.LeftClick
Delay 1000
Goto 开始
End If
End Sub
找不到图片，这是什么原因
import "d:\obj.vbs"
Set dm = New dmsoft'创建对象
dm_ret = dm.SetPath("d:\")
LogStart "D:\向僵尸开炮.log"
arr_pic = array("枪械射击", "电磁穿刺", "装甲车", "燃油弹", "随机")
Rem a
Do
dm_ret = dm.FindPic(14,342,560,742,"2.bmp","000000",0.9,0,intX,intY)
If intX >= 0 and intY >= 0 Then
For i = 0 To UBound(arr_pic)
找图(arr_pic(i))
Next
End If
Loop
Sub 找图(路径)
dm_ret = dm.FindPic(14,342,560,742,路径&".bmp","000000",0.6,0,intX,intY)
If intX >= 0 and intY >= 0 Then
技能=Replace(路径,".bmp","")
TracePrint "选择" & 技能 & Now()
dm.MoveTo intX, intY
dm.LeftClick
Delay 1000
Goto a
End If
End Sub

这样就能找到，这是什么原因？路径问题吗