简单实用的找多图源码，用数组方法无法解决，可以用此方法解决-Sub 找多图(x坐标, y坐标, x1坐标, y1坐标, 图片路径, 相似度, x偏移量, y偏移量, 图片像素x, 图片像素y, 延时时间, 鼠标动作)

　　//　 如　Call 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 2, 10, 5, 20, 100, "LeftClick 2")

　　a = x坐标

　　b = y坐标

　　c = x1坐标

　　d = y1坐标

　　e = 0

　　Do

　　　　FindPic a,b,c,d,图片路径,相似度,intX,intY

　　　　If intX > 0 And intY > 0 Then

　　　　　　TracePrint intX & "," & intY

　　　　　　i = 0

　　　　　　a = intX+ 图片像素x

　　　　　　d = intY+ 图片像素y

　　　　　　TracePrint d

　　　　　　e = intY+ 图片像素y

　　　　　　MoveTo intX+x偏移量, intY+y偏移量

　　　　　　Delay 延时时间

　　　　　　execute 鼠标动作

　　　　ElseIf intX < 0 and intY < 0 Then

　　　　　　TracePrint intX & "," & intY

　　　　　　a = 0

　　　　　　b = e

　　　　　　d = 1000

　　　　　　i = i+ 1

　　　　　　TracePrint i

　　　　　　If i >= 3 Then

　　　　　　　　Exit Do

　　　　　　End If

　　　　End If

　　　　Delay 1000

　　Loop

End Sub