### 使用 VB.NET 读取 Access 数据库中的一列数据 以下是使用 VB.NET 读取 Access 数据库中一列数据的示例代码： ```vbnet Imports System.Data.OleDb Module Module1 Sub Main() Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\YourDatabase.accdb" Dim sql As String = "SELECT YourColumnName FROM YourTableName" Dim columnData As New List(Of String) Using connection As New OleDbConnection(connectionString) Using command As New OleDbCommand(sql, connection) Try connection.Open() Using reader As OleDbDataReader = command.ExecuteReader() While reader.Read() columnData.Add(reader(0).ToString()) End While End Using Catch ex As Exception Console.WriteLine("Error: " & ex.Message) End Try End Using End Using ' 输出读取的列数据 For Each item In columnData Console.WriteLine(item) Next End Sub End Module ``` 上述代码中，使用 `OleDbConnection` 建立与 Access 数据库的连接，通过 `OleDbCommand` 执行 SQL 查询语句，使用 `OleDbDataReader` 读取查询结果，并将每一行的指定列数据添加到 `List(Of String)` 中，最后遍历输出这些数据。 ### 使用 C# 读取 Access 数据库中的一列数据 参考引用中的 C# 代码示例，以下是一个完整的实现： ```csharp using System; using System.Data.OleDb; class Program { public static string[] read_a_Col_from_oneRowDataTable(string _connectionstr, string _tablename, string _colname) { string result = ""; string[] columnData = null; using (OleDbConnection connection = new OleDbConnection(_connectionstr)) { string sql = $"SELECT {_colname} FROM {_tablename}"; using (OleDbCommand command = new OleDbCommand(sql, connection)) { try { connection.Open(); using (OleDbDataReader reader = command.ExecuteReader()) { var dataList = new System.Collections.Generic.List<string>(); while (reader.Read()) { dataList.Add(reader[0].ToString()); } columnData = dataList.ToArray(); } } catch (Exception ex) { Console.WriteLine("Error: " + ex.Message); } } } return columnData; } static void Main() { string connectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\YourDatabase.accdb"; string tableName = "YourTableName"; string columnName = "YourColumnName"; string[] columnData = read_a_Col_from_oneRowDataTable(connectionString, tableName, columnName); foreach (string item in columnData) { Console.WriteLine(item); } } } ``` 这段 C# 代码实现了类似的功能，通过传入连接字符串、表名和列名，读取指定列的数据并存储在字符串数组中，最后输出这些数据。 ### 使用 Python 读取 Access 数据库中的一列数据 以下是使用 Python 读取 Access 数据库中一列数据的示例代码，使用 `pyodbc` 库： ```python import pyodbc # 连接数据库 conn_str = ( r'DRIVER={Microsoft Access Driver (*.mdb, *.accdb)};' r'DBQ=C:\YourDatabase.accdb;') conn = pyodbc.connect(conn_str) cursor = conn.cursor() # 执行查询 query = "SELECT YourColumnName FROM YourTableName" cursor.execute(query) # 获取数据 column_data = [] for row in cursor.fetchall(): column_data.append(row[0]) # 输出数据 for item in column_data: print(item) # 关闭连接 cursor.close() conn.close() ```