Dim qm as QMDISPATCHLib.QMFunctionClass;
//qm实例化,...有一段时间没有VB.Net了,具体怎么实例化貌似忘记了 抱歉 身边没有书。。。
Dim i as Int16;
//为了提高速度,在比较小的范围中搜索
i = qm.FindPic(400, 0, 650, 50, "Sea12Pic.bmp", (float)0.9);
If (i > 0)
return 1;//成功匹配
elseIf
return 0;//未搜索到
End If
QMDISPATCHLib.QMFunctionClass qm = new QMDISPATCHLib.QMFunctionClass();
int i;
//为了提高速度,在比较小的范围中搜索
i = qm.FindPic(400, 0, 650, 50, "Sea12Pic.bmp", (float)0.9);
if (i > 0)
return 1;//成功匹配
else
return 0;//未搜索到