vb.net调用数据库 vbnet数据库编程例子

vb.net 怎么操作数据库

如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样操作数据库了！

另外

.NET Framework中连接数据库要用到ADO.NET。如果要操作Access数据库，要用到System.Data.OleDb命名空间下的许多类。

比如按楼主所说，“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”：

'首先导入命名空间

Imports System.Data

Imports System.Data.OleDb

'然后在某一个事件处理程序中写：

Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库.accdb;Jet OLEDB:Database Password=MyDbPassword")

Dim command As New OleDbCommand("Select * From 数据表", conn)

conn.Open() '打开数据库连接

Dim reader As OleDbDataReader = command.ExecuteReader() '执行SQL语句，返回OleDbDataReader 对象

Do While reader.Read() '读取一条数据

textbox1.Text += reader("一些数据") VbCrLf

Loop

reader.Close() '关闭OleDbDataReader

conn.Close() '关闭连接

相关问答

Q1: VB.net如何调用ACCESS数据库中的数据

使用向导设置数据库连接的好处是省去写代码的过程，弊端是不易更改连接

使用代码连接的好处是需要编写代码，但容易更改和维护

如：数据库的位置变化，直接更改代码显然容易一些

代码：

imports System.data.oledb /*引用命名空间*/

dim cnstr = "provider=microsoft.jet.oledb.4.0,data source=Access数据库文件位置" /*定义连接字符串*/

dim cn as oledbconnection = new oledbconnection(cnstr) /*定义连接*/

cn.open() /*打开连接*/

sqlstr="select... from... 或其他sql"

dim cmd as sqlcommand=new sqlcommand()

cmd.commandtext=sqlstr

cmd.connection=cn

/*以上是建立执行语句*/

cmd.executenonquery() 不返回结果

cmd.executescalar() 返回单个结果

cmd.executereader() 返回结果集

/*以上是执行sql语句的方法*/

cn.close() /*关闭连接*/

你要做用户验证的话，先根据用户名查询对应的密码，再判断用户输入的密码和查询结果是不是相同就可以了

用cmd.executescalar() 这个方法

Q2: vb.net连接数据库

1、 用The SQL Server .NET Data Provider连接数据库

The SQL Server .NET Data Provider是利用SqlConnection类来连接SQL Server7.0或更高版本的数据库，

SqlConnection类位于名称空间System.Data.SqlClient下。

连接代码：

Dim sqlConnection1 As SqlClient.SqlConnection

Dim strConnect As String=”data source=服务器名;initial catalog=数据库名;user id=sa;password=;”

sqlConnection1=New System.Data.SqlClient.SqlConnection(strConnect)

sqlConnection1.open ‘打开数据库

sqlConnection1.close ‘关闭连接，释放资源

2、 用The OLE DB .NET Data Provider连接数据库

上面已经说过，利用The OLE DB .NET Data Provider可以访问Access、Oracle和SQL Server等种数据

库，那么，它是怎样访问这些数据库的呢？The OLE DB .NET Data Provider是通过位于名称空间Sy

stem.Data.OleDb类库下的OleDbConnection类来连接这三种不同类型的数据库的。下面举例说明:

1)连接SQL Server数据库

Dim oleDbConnection1 As OleDb.OleDbConnection

Dim strConnect As Sting=”Provider=SQLOLEDB;Persist Security Info=False;Data Source=服务器名;Initial Catalog=数据库名;User ID=sa;Password=;”

oleDbConnection1=New System.Data.OleDb.OleDbConnection(strConnect)

2)连接Access数据库

假设要连接的Access数据库名为“Example.mdb”，存放在d:\Data\目录下。

Dim oleDbConnection1 As OleDb.OleDbConnection

Dim strConnect As Sting=”Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\Data\ Example.mdb”

oleDbConnection1= New System.Data.OleDb.OleDbConnection(strConnect)

3)连接Oracle数据库

Dim oleDbConnection1 As OleDb.OleDbConnection

Dim strConnect As Sting=”Provider=MSDAORA;Data Source=服务器名;User ID=用户ID;Password=密码;”

oleDbConnection1= New System.Data.OleDb.OleDbConnection(strConnect)

3、 用The ODBC .NET Data Provider连接数据库

The ODBC .NET Data Provider连接数据库是通过OdbcConnection类来实现的，这个类位于名称空间

Microsoft.Data.Odbc下，而名称空间Microsoft.Data.Odbc是封装在Microsoft.Data.Odbc.dll文件下的。

由于篇幅有限，这里就只介绍连接Sql Server和Oracle数据库的方法，其他数据库的连接方法基本类

似，我就不再多讲了。

1)连接Sql Server数据库

Dim odbcDbConnetion1 As Microsoft.Data.OdbcConnection

Dim strConnect As Sting=”Driver={SQL Server};Server=服务器名;Uid=sa;pwd=;Database= 数据库名;”

odbcDbConnetion1=New Microsoft.Data.OdbcConnection(strConnect)

2)连接Oracle数据库

Dim odbcDbConnetion1 As Microsoft.Data.OdbcConnection

Dim strConnect As Sting=”Driver={Microsoft ODBC for Oracle};Server=服务器名;Uid=sa;pwd=;”

odbcDbConnetion1=New Microsoft.Data.OdbcConnection(strConnect)

四、总结

通过本文的介绍，读者基本掌握了在Visual Basic.NET中用ADO.NET和ODBC.NET连接各种数据库的方法

。以上三种驱动针对不同的数据库，它们的性能方面也有很大的不同：The SQL Server .NET Data Provider

的效率最高；The OLE DB .NET Data Provider的效率比较底；The ODBC .NET Data Provider的效率最慢。

具体连接哪一种数据库选用哪一种数据驱动要从工作效率方面来考虑。

以上回答你满意么？

Q3: 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开发数据库管理系统的程序员。

Q4: vb.net 中如何使用SQL语句查询数据库中的数据

1、首先打开Visual Studio 2008代码窗口vb.net调用数据库，添加引用。

2、输入以下代码：Public conn1  As SqlConnection = New SqlConnection 。

3、声明关键字 Publicvb.net调用数据库；（因为是全局变量，所以用Public 来声明）。

4、如果SQL 数据库就在本机，则用以下代码连接。

5、如果代码太长，影响可读性，可以用空格加"_"后，回车换行即可。

关于vb.net调用数据库和vbnet数据库编程例子的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。