Question

请教VB 如何使用vbAdvance 生成dll文件

我的步骤是这样的
1、 安装+注册vbAdvance
2、新建exe工程，移除form1窗体,添加Module1模块,写入代码
3、点击Make Rosource-Only Dll 报错:

请问是不是步骤错了，该怎么弄?（没积分了，赚了积分再追加，先挂起来等老师大神搭救）

Answer 1

一、DLL制作
1．打开新建工程
2．选择“Active DLL”，单击“打开”按钮。
3．单击打开按钮后，系统在工程中添加一类模块。
4．为方便对DLL的引用可以改一下名称，如将类模块的名称改为Fraction。
5．在本类模块中添加代码如下。
Option Explicit
Public Num
Public Den
Public Sub Add(NUm2, Den2)
Num = NUm2 + Den2
End Sub

Public Sub Sbt(NUm2, Den2)
Num = NUm2 - Den2
End Sub

Public Sub Mul(NUm2, Den2)
Num = NUm2 * Den2
End Sub

Public Sub Div(NUm2, Den2)
Num = NUm2 / Den2
End Sub

6．为与其他工程相区别，可将本工程命名为“Math”。
7．生成DLL文件。
二、DLL引用
1．建立一个普通窗体。
2．添加引用。
3．在程序中添加以下代码。
Option Explicit
Public Frac As New Fraction
Private Sub Command1_Click()
Frac.Add Val(Text1.Text), Val(Text2.Text)
Text3.Text = Frac.Num
End Sub

Private Sub Command2_Click()
Frac.Sbt Val(Text1.Text), Val(Text2.Text)
Text3.Text = Frac.Num
End Sub

Private Sub Command3_Click()
Frac.Mul Val(Text1.Text), Val(Text2.Text)
Text3.Text = Frac.Num
End Sub

Private Sub Command4_Click()
Frac.Div Val(Text1.Text), Val(Text2.Text)
Text3.Text = Frac.Num
End Sub

Private Sub Command5_Click()
Text1 = ""
Text2 = ""
Text3 = ""
End Sub
4．运行程序。

追问

谢谢指点，可是我想生成能带Main函数的dl,用来注入线程，而不是Active DLL，请问怎么弄啊？