VB.NET 代码 读取access

以下是 VB.NET 代码读取 Access 数据库的示例：

Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;"
Dim conn As New OleDbConnection(connString)

Try
    conn.Open()

    Dim query As String = "SELECT * FROM mytable"
    Dim cmd As New OleDbCommand(query, conn)
    Dim reader As OleDbDataReader = cmd.ExecuteReader()

    While reader.Read()
        Console.WriteLine(reader("column1").ToString())
        Console.WriteLine(reader("column2").ToString())
        '继续读取其他列
    End While

    reader.Close()
    cmd.Dispose()
    conn.Close()

Catch ex As Exception
    Console.WriteLine("Error: " & ex.ToString())
End Try

以上代码使用 OleDbConnection 和 OleDbCommand 对象连接到 Access 数据库，然后使用 OleDbDataReader 对象读取数据。其中，connString 变量存储连接字符串，query 变量存储查询语句，reader 对象用于读取结果集。在读取结果集时，可以通过 reader("column1").ToString() 访问某一列的值。

请注意，上述示例仅供参考，实际应用中需要根据具体情况进行修改。例如，需要根据数据库版本选择不同的 OLEDB Provider，需要根据表结构对查询语句进行修改等。