VBNET ACCESS操作方法

或以access2000为例 在VBNET下操作（VS2010）
包括
新建数据库文件，（加密，不加密）
新建数据表（字段等）
查询所有数据表（数据库中的数据表）
数据表重命名
在数据表中添加或删除记录；查询字段、记录；添加新字段；导出记录（带条件）等

Imports System.Data.OleDb  

Public Class Form1  
    Dim cn As OleDbConnection  
    Dim da As OleDbDataAdapter  
    Dim ds As DataSet  

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load  
        Dim cnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\persons.mdb;Persist Security Info=False"  
        cn = New OleDbConnection(cnStr)  
        Dim sql As String = "select * from grade"  
        da = New OleDbDataAdapter(sql, cn)  
        ds = New DataSet  
        da.Fill(ds, "grade")  
        DataGridView1.DataSource = ds.Tables(0)  
    End Sub  
End Class解释：
       Dim cnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\persons.mdb;Persist Security Info=False"  

这段是创建链接字符串，你可以根据自己数据库实际存放位置进行修改
Dim sql As String = "select * from grade"

这是数据库查询语句，你可以根据实际情况修改下
Dim sql As String = "select * from grade"  
        da = New OleDbDataAdapter(sql, cn)  
        ds = New DataSet  
        da.Fill(ds, "grade")  
        DataGridView1.DataSource = ds.Tables(0)  
这是执行查询语句后，将查询的结果存入datagridview中

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息