的代码中的 ClsFindstring.clsFindStr怎么写

Question

Dim DllFindStr As Object '申明对象'实例化对象为创建的DLL类库对象'ClsFindstring为DLL库名，clsFindStr为DLL类名Set DllFindStr = CreateObject("ClsFindstring.clsFindStr")  DllFindStr.sFindStr Text2, Me.Text0 '调用DLL类库方法，运行程序Set DllFindStr = Nothing '释放对象请问上面的代码中的 ClsFindstring.clsFindStr怎么写  
假设dll 文件 TiffChangeDLL.dll里面的函数   
Function ImgModifyPiexls(strImage:string;iPiexls:integer):boolean;stdcall;

Answer 1

ClsFindstring.clsFindStr，前面是库名，一般就是dll的名字，后面是这个activex dll里面的一个类的名称。觉得你这个TiffChangeDLL.dll应该是个标准dll。调用方式和vb的api函数一样的。Public Declare Function ImgModifyPiexls Lib "TiffChangeDLL.dll" (ByVal strImage As String,ByVal iPiexls As Integer) As Boolean

Answer 2

你好，用你的调用方法提示错误，我的dll没有注册成功只是载入成功了 有影响吗

Answer 3

那你的是标准dll。提示什么错误？TiffChangeDLL.dll应该和exe放在一起，编译成exe运行。