VB.NET 代码 取得ACCESS有多少列

你可以使用 OleDbDataReader.FieldCount 属性来获取Access表中的列数。以下是一个示例代码：

Dim connString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\yourDB.accdb"
Dim queryString As String = "SELECT * FROM yourTable"
Dim conn As New OleDbConnection(connString)
Dim cmd As New OleDbCommand(queryString, conn)

conn.Open()
Dim reader As OleDbDataReader = cmd.ExecuteReader()

Dim columnCount As Integer = reader.FieldCount
Console.WriteLine("There are {0} columns in the table.", columnCount)

reader.Close()
conn.Close()

注意替换connString中的文件路径和查询语句中的表名以适应你的情况。

相关问题

VB.NET 代码 ACCESS的指定列数据

要获取ACCESS数据库中指定列的数据，可以使用以下代码：

Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\example.accdb;Persist Security Info=False;"
Dim connection As New OleDbConnection(connectionString)
Dim command As New OleDbCommand("SELECT column_name FROM table_name", connection)

connection.Open()

Dim reader As OleDbDataReader = command.ExecuteReader()

While reader.Read()
    Dim columnData As String = reader.GetString(0)
    '在这里使用列数据
End While

reader.Close()
connection.Close()

在上面的代码中，将`column_name`替换为你要获取的列的名称，将`table_name`替换为你要查询的表的名称。然后，使用`GetString()`方法从`OleDbDataReader`对象中获取指定列的数据。

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，需要根据表结构对查询语句进行修改等。