VB.NET通过调用模块怎么建立access数据库?

oledb的使用网上的确很多.\x0d\x0a如果只是查询. 写入. 删除,我们常用的就是\x0d\x0aOleDbConnection '用于写数据库的连接\x0d\x0aOleDbCommand '用于数据的 *** 作 接收SQL语句 并执行\x0d\x0aOleDbDataReader '查询了,我们就用这个类来读取查询的对象\x0d\x0a1).OleDbConnection \x0d\x0a dim conn as new OleDbConnection("Provider = Microsoft.Jet.OLEDB.4.0Data Source =数据库的路径")'连接字符串一般就这样 \x0d\x0a 查询前在打开 \x0d\x0a conn.open\x0d\x0a 2).OleDbCommand \x0d\x0a dim cmd as new OleDbCommand ("SQL语句",conn)'SQL语句决定了你是查询写入还是更新删除\x0d\x0a '''\x0d\x0a如果是查询,你还要用到OleDbDataReader \x0d\x0a 这个是不用新建的不能用New \x0d\x0adim rd as OleDbDataReader=cmd.ExecuteReader'cmd.ExecuteReader 方法就是读取查询的内容\x0d\x0acmd.ExecuteNonQuery用于执行 *** 作 返回变动的条数 ,一般用于 添加 删除 更新 等其它 *** 作\x0d\x0a \x0d\x0a其实就这些了,就是要学点SQL语句就行了.\x0d\x0a标准执行过程就是\x0d\x0aDim conn As New OleDbConnection("连接字符串")\x0d\x0aconn.Open()\x0d\x0aDim cmd As New OleDbCommand("SQL语句", conn)\x0d\x0a'如果是写入 更新 删除 则\x0d\x0acmd.ExecuteNonQuery()\x0d\x0a 否则\x0d\x0aDim rd As OleDbDataReader = cmd.ExecuteReader\x0d\x0a\x0d\x0aIf rd.Read Then\x0d\x0aDim d As Object = rd.Item("字段名")\x0d\x0aEnd If\x0d\x0a结束如果\x0d\x0ard.Close()\x0d\x0acmd.Dispose()\x0d\x0aconn.Close()\x0d\x0a \x0d\x0a上面要有 Imports System.Data.OleDb

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

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

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

代码：

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() 这个方法

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

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

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

---