怎么样创建dll,提供相关资料或方法。

解决方案 »

  1.   

    组件工程名:project_sum,类名:class1
    Public Function sum(la As Long, lb As Long) As Long
        sum = la + lb
    End Function  编译后,测试
    Dim obj As project_sum.Class1
    Private Sub Command1_Click()
    Set obj = New project_sum.Class1
    MsgBox obj.Sum(2, 3)
    End Sub
      

  2.   

    ActiveX DLL
    http://www.efile.com.cn/efile/rukyo/%C0%E0%C4%A3%BF%E9.zip
      

  3.   

    file->new project->activex dll
    设计代码
    file->make XXX.dll