在VB里面怎么调用QMDispatch.dll

在VB里面如何调用QMDispatch.dll ？
QMDispatch.dll是按键精灵里面一个active插件，我主要是想要使用他的查找图片的函数FindPic
我采用的是在工程里面引用改active插件，然后
Public QMDispatchObj As Object
定义一个变量

Set QMDispatchObj = CreateObject("QMDispatch.QMFunction")
QMDispatchObj.FindPic resrect.Left, resrect.Top, resrect.Right, resrect.Bottom, "E:\项目\梦幻西游外挂\进入游戏.bmp", 0.9
然后成功执行到"Set QMDispatchObj = CreateObject("QMDispatch.QMFunction")"这句时就出了个"自动化"错误，不知道怎么回事，大家帮我看看，谢谢了。

------解决方案--------------------
工程菜单--引用--然后点浏览
先定你要加载的文件就可以了.
------解决方案--------------------
首先，你要知道函数的原型然后regsvr32注册dll，将dll拷贝的系统目录
根据函数原型声明函数
例如：
Private Declare Function FindPic Lib "QMDispatch" () As Long
然后就可以用了。