VB中DLL如何生成
我知道新建dll编辑后可以生成dll,但是如果我是以工程,如窗体还有其它模块等在一起,此时我想将其中的一个类模块单独生成一个DLL,我应该怎么操作...
我知道新建dll编辑后可以生成dll,但是如果我是以工程,如窗体还有其它模块等在一起,此时我想将其中的一个类模块单独生成一个DLL,我应该怎么操作
展开
5个回答
展开全部
一、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.运行程序。
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.运行程序。
展开全部
首先建立工程时:应该创建ActiveX dll
然后在工程属性中选择二进制兼容,即可编写自己所需的DLL
然后在工程属性中选择二进制兼容,即可编写自己所需的DLL
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
另存 新建DLL工程 添加另存的模块 生成
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2014-08-30
展开全部
似乎不能,dll请单独开发,然后给某个工程调用。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
晕,你再好好看看代码吧,C里的K是从0到N,N=800,VB里的K是从0到100,这个差了8倍!
这样可以么?
这样可以么?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询