的代码中的 ClsFindstring.clsFindStr如何写

的代码中的 ClsFindstring.clsFindStr怎么写
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;


[解决办法]