VB调用自己写的DLL错误，请大牛帮忙
我在VB6里面新建一个ActieX Dll代码如下：
Option Explicit
Public Function WznFunt()
Dim fn As Integer
fn = FreeFile
Open "C:\test.txt" For Output As #fn
Print #fn, Trim("WZN")
Close #fn
End Function
工程的名字改为了MyTest
编译成wzntest.dll
‘’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’
‘’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’
然后我新建一个VB的标准exe程序
添加一个Form
在工程的属性里引用了我生成的那个dll（通过绝对地址）
在Form上添加一个Command
我想在按这个Command的时候执行这个dll的语句。
应该怎么写？
我是这样写的
Dim MyClass As New MyTest
Mytest.wznfun
Set mytest=nothing
执行时显示
我在VB6里面新建一个ActieX Dll
代码如下：
Option Explicit
Public Function WznFunt()
Dim fn As Integer
fn = FreeFile
Open "C:\test.txt" For Output As #fn
Print #fn, Trim("WZN")
Close #fn
End Function
工程的名字改为了MyTest
编译成wzntest.dll
‘’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’
‘’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’
然后我新建一个VB的标准exe程序
添加一个Form
在工程的属性里引用了我生成的那个dll（通过绝对地址）
在Form上添加一个Command
我想在按这个Command的时候执行这个dll的语句。
应该怎么写？
我是这样写的
Dim MyClass As New MyTest
Mytest.wznfun
Set mytest=nothing
执行时显示
“编译错误”
“缺少用户定义类型，不是工程”
--------------------编程问答--------------------
你的dll文件和ActieX Dll 工程名不一样吗？怎么可能
你的dll中“类模块”的名是什么
--------------------编程问答-------------------- 更正上帖,CSDN中代码里不能变颜色
Dim MyClass As New 类模块名 '类模块名！！！不是函数名
MyClass.wznfun 'Myclass是实例化的对象，你原来用Mytext什么意思，根本不能那样用
Set MyClass=nothing
--------------------编程问答-------------------- 对不起错了，我编译成了MyTest.dll --------------------编程问答-------------------- dim 定义不过去啊
Dim MyClass As New 类模块名 '类模块名！！！不是函数名
MyClass.wznfun 'Myclass是实例化的对象，你原来用Mytext什么意思，根本不能那样用
Set MyClass=nothing
我用的是vb6 --------------------编程问答-------------------- 好像得在“通用”中声明类模块，
补充：VB , 控件
