vb.net引用资源文件 vb中怎样引用文件路径

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如何调用资源文件(resx)里的图片？

放在解决方案资源管理器还没完。进入项目属性，资源，把解决方案资源管理器里的资源文件拖进来，改个便于调用的名称，然后My.Resources里面就可以调用了。如果是VS可以识别的，那么就直接是Bitmap类型的，可以隐式转换成Image类型。

vb.net引用Dll的问题

上级目录不可以，但是为了保证程序路径改变，引用不会被破坏。可以有几个方法：

1.将DLL文件放在程序同级目录

2.将DLL文件放在程序子目录

3.将DLL文件放在System32目录下（系统目录，可以直接引用DLL）

4.可以将DLL文件打包成资源文件，融合到EXE程序中，每次执行判断同级目录是否有DLL文件，不存在，释放资源文件。

vb.net2008中怎样调用资源文件中的MDB数据库

在此本人使用ADO对象访问ACCESS数据库，但ADO对象在使用前你先要进行添加，启动VB6后，单击菜单“工程-引用”，打开引用对话框，选择“Microsoft ActiveX Data Objects 2.0 Library”，将其勾选，（以2.0版本为例，实际可以选择系统中的最高版本如本人的就是2.6版本），然后在当前目录下建立一个名为“学生”的ACCESS数据库，其中表名为“表”,字段共有：学号，姓名，年龄，性别四个字段，接下来就是设计界面了(自己设计)

现在介绍如何使用代码访问ACCESS数据库：

在代码窗口中编写一个返回字符型的函数

Function Connection() As String

'数据库的连接设置配置

Connection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path + "\学生.mdb"

End Function

该函数用于连接数据库用

Private Form_Load()

Dim cnn As New ADODB.Connection

Dim Rst As New ADODB.Recordset

cnn.Open Connection

Set Rst = New ADODB.Recordset

Rst.Open "select * from 表", cnn, adOpenKeyset, adLockOptimistic

End Sub

注：

Dim cnn As New ADODB.Connection创建一个ADO数据库连接对象

Dim Rst As New ADODB.Recordset为创建一个ADO数据库记录对象

select * from 表 是SQL查询语言，这里为数据源，意思就是打开数据库“学生”中的表“表”

下面是将数据库表中的字段值显示出来的一个过程

Sub View()

Dim i As Integer

For i = 0 To 2

Text1(i) = Rst.Fields(i)'text1为控件数组

Next

If (Rst.Fields(3) = True) Then

Text1(3) = "男"

Else

Text1(3) = "女"

End If

End Sub

要访问ACCESS数据库就这样可以实现，访问SQL也差不多，稍有不同，回答完毕，如还有问题请继续和我联系，本人是专使用VB+SQL/Delphi+SQL开发数据库管理系统的程序员。