以前从摸过VB,现在因为实际需要。打算使用VB编写一个ocx控件。现在碰到给问题:
我创建了一个ActiveX控件的工程userControl
然后通过工程=>填加类摸板 增加了一个Encoding.cls的类
我在类中定义了一些function,比如encoder等现在的问题是摸如何才能在usercontrol中使用这个Encoding类中的函数
我试图在userControl做使用
Dim encoder As ...
但是我发觉As之后显示出来的列表中找不到Encoding

解决方案 »

  1.   

    Dim AA As New encoder
    AA.你的函数
      

  2.   

    不知道是否我自己没有理解对。
    我使用文件=>填加工程 新建了一个标准Exe工程
    然后填加代码
    Option ExplicitDim encoder As New EncodingPrivate Sub Command1_Click()
        Dim txt As String
        Dim length As String
        Dim result As String
        
        txt = Text1.Text
        
        result = encoder.encoder(parm1, parm2, parm3, parm4)
        MsgBox result
    End Sub尝试运行时报"用户定义类型未定义"