按键精灵找色

VBSCall FindColor0,0,1024,768,"0000FF",intX,intY)
If intX>0 and intY>0
//执行找到颜色后的命令
else
//执行没有找到颜色的命令

//参数1(类型:Integer)=查找范围.左
//参数2(类型:Integer)=查找范围.上
//参数3(类型:Integer)=查找范围.右
//参数4(类型:Integer)=查找范围.下
//参数5(类型:String)=查找颜色
//参数6(类型:Integer)=查找模式;0=从左上往右下、1=从中心往四周、2=从右下往左上
//参数7(类型:Single)=颜色匹配率：1=100%匹配、0.9=90%匹配、0.8=80%匹配……
//参数8(类型:Integer)=返回找到颜色的坐标.X;没找到则返回 -1
//参数9(类型:Integer)=返回找到颜色的坐标.Y;没找到则返回 -1
VBSCall FindColorEx(0,0,800,600,"FFFFFF",0,0.9,intX,intY)
If intX&intY<>"-1-1"
//Msgbox "找到颜色,坐标在"&intX&","&intY
//在这里添加你的找到颜色后的代码
Else
//Msgbox "没找到颜色"
//在这里添加你的没找到颜色后的代码
EndIf