成都创新互联网站制作重庆分公司

vb.net读取dll vbnet读写文件

怎样用VB.NET写和调用DLl窗体

一、带窗体的dll创建

创新互联-专业网站定制、快速模板网站建设、高性价比沙洋网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式沙洋网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖沙洋地区。费用合理售后完善,十余年实体公司更值得信赖。

1、先新建 类库(testdll),在项目中添加两个窗体form1(主窗体)、form2,为了与后面的调用区分分别命名为fm1,fm2;并在fm1窗体中添加一个按钮用来调用fm2如下图

2、在fm1窗体代码中先引用fm2,    按钮代码调用fm2.如图

3、生成dll,(class1.vb中不需要写任何代码)

二、调用dll

1、新建 一个windows应用程序并添加一个按钮用来调用dll中的窗体,选 择 “项目”-“添加引用”,选择刚才创建的testdll

2、窗体代码中先引用testdll,再定义一个testdll中的fm1对象,最后执行对象的show方法

3、运行结果如下:

vb 如何调用 NET写的DLL?

VB.net语言

1、创建组件定义

新建一个Probject,在代码中写入:

Public Interface IDemo

Function Test() As String

End Interface

2、实现组件定义

新建一个Probject,添加对上述Probject的引用后,在代码中写入

Public Class Demo

Implements IDemo.IDemo

Public Function Test() As String Implements IDemo.IDemo.Test

Test = "Hello World!"

End Function

End Class

3、编译出Demo.dll组件

4、使用.net的工具 Visual Studio .Net 2003 Command Prompt,输入以下命令

Regasm Demo.dll /tlb:Demo.tlb

把Demo.dll注册为一个com对象(这个com对象不等同于普通的用VB编写的Com对象),并导出类型库Demo.tlb

5、新建一个VB工程,添加对Demo.tlb和IDemo.tlb的引用

6、定义两个全局变量

Dim vbDemo As Demo.Demo

Dim vbIDemo as IDemo.IDemo

7、在Form_Load事件中初始化

'初始化实体类

Set vbDemo = New Demo.Demo

'将实体类引用到抽象类

Set vbIDemo = vbDemo

8、然后,我们就可以用 vbIDemo.Test 这样的方法了

vb.net 调用其他文件 如 dll

DLL(动态链接库)是一个很有用的东西,在开发大项目的时候显得非常重要,因为多人合作开发时,可以给每个人分配一个任务,用DLL完成,最后组合起来,就不会出现互相冲突的问题。这里给出最简单的DLL编写与调用的示例

首先,我们打开VB.NET,选择类库,名称改为test

然后输入以下代码

Public Class test

Public Function test(ByVal a As Long, ByVal b As Long) As Long

Return a + b

End Function

End Class

保存后,生成DLL文件。

这就是最简单的一个DLL,下面是调用该DLL的示例

新建一个工程,单击“项目” -- 添加引用

找到刚才生成的DLL,双击它

添加引用以后,似乎什么也没发生,这时我们输入以下代码:

Imports test.test

这样,就包含了该DLL的类。

然后我们定义一个类

Dim test As New test.test

这样,就可以使用里面的函数了,下面是程序示例

Imports test.test

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim test As New test.test

MsgBox(test.test(1, 2))

End Sub

End Class

运行该程序,可以看到,调用了DLL内的函数。

这就是最简单的DLL示例,可以将一些复杂的代码集成到DLL里,以后升级或重用都比较方便。


名称栏目:vb.net读取dll vbnet读写文件
分享网址:http://cxhlcq.com/article/hjddsg.html

其他资讯

在线咨询

微信咨询

电话咨询

028-86922220(工作日)

18980820575(7×24)

提交需求

返回顶部