vb.net数据库ac vbnet access数据库查询例程

vb.net 怎么样访问access数据库？

VB.NET使用OLEDB连接数据库，即可进行操作了。

但是不推荐使用ACCESS数据库，这个已经淘汰了。

VB.NET连接数据库，从性能上来说，官方推荐使用的是SQL SERVER 2005

相关问答

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连接ACCESS数据库，读取查询并显示

给你写个例子，不明白，再问！！

'引入OLEDB命令空间

Imports System.Data.OleDb

Public Class Form1

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

'定义一个OLEDB连接并实例化它

Dim con As New OleDbConnection

'定义一个OLEDB命令并实例化他

Dim cmd As New OleDbCommand

'定义一个OLEDBReader方法来读取数据库

Dim dr As OleDbDataReader

'初始化con的连接属性，使用OLEDB模式，数据源为：你指定下路径，我的是在D盘

con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\dataSample.mdb"

'打开OLEDB数据连接

con.Open()

'初始化OLEDB命令的连接属性为con,这个需要你理解下

cmd.Connection = con

'初始化OLEDB命令的语句 就是查询 什么字段从什么表 条件是ID等于你在t1中输入的内容

cmd.CommandText = "select keyss from table1 where ID=" t1.Text ""

'执行OLEDB命令以ExecuteReader()方式，并返回一个OLEDBReader，赋值给dr

dr = cmd.ExecuteReader()

'判断下dr中是否有数据。如果有就把第一个值赋值给t2的值

If dr.Read() Then

t2.Text = dr(0)

End If

'完成后关闭dr.con等释放资源

dr.Close()

con.Close()

End Sub

End Class

Q3: VB.NET连接access 数据库问题

'1、 新建模块

Module Module1

Public ADOConn As New ADODB.Connection

Public Adors As New ADODB.Recordset

End Module

'2、 引用

'引用adodb 7.0.3300.0

'3、 模块函数

连接函数：

Public Function LinkDatabase(ByVal AppPath As String) As String

LinkDatabase = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" AppPath "\Database.mdb;Persist Security Info=False;Jet OLEDB:Database Password=111111"

End Function

'4、 OK_Click确定登录事件

Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click

'测试用户名及密码是否有效

ADOConn.ConnectionString = LinkDatabase(System.Environment.CurrentDirectory) '参数为当前目录位置

ADOConn.CommandTimeout = 10

ADOConn.CursorLocation = ADODB.CursorLocationEnum.adUseClient

ADOConn.Open()

Adors.Open("select * from Tables where 姓名='" Trim(UsernameTextBox.Text) "' and 密码='" PasswordTextBox.Text "'", ADOConn)

If Adors.RecordCount 0 Then

ADOConn.Close()

MDIParent1.Show()

Me.Hide()

Else

ADOConn.Close()

MsgBox("错误:" vbCrlf vbCrlf "无效用户名或密码,禁止用户登录.", MsgBoxStyle.Critical, "Error")

PasswordTextBox.Text = ""

PasswordTextBox.Focus()

End If

End Sub

'当然Adors.Open("……",ADOConn)表示查询，结果是不允许修改的，要修改必需加参数：Adors.Open("……", ADOConn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic)

Q4: 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()

'关闭连接

Q5: VB.NET如何生成ACCESS数据库？并生成表。 VB.NET

我的需求就是先填写好表和表中字段的名称，然后点击一个按钮，就在指定的路径生成一个ACCESS数据库。而不是事先手动创建。 请知道的各位附上完整代码，本人刚接触VB.NET，有些东西还不是很了解。谢谢。

vb.net数据库ac的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet access数据库查询例程、vb.net数据库ac的信息别忘了在本站进行查找喔。