要调用Access数据库文件,可以使用Visual Basic(VB)中的ADODB对象和连接字符串。以下是一个简单的示例代码:
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\your\database.accdb;"
rs.Open "SELECT * FROM TableName", conn
Do While Not rs.EOF
'处理数据
rs.MoveNext
Loop
rs.Close
conn.Close
在上面的代码中,使用ADODB.Connection对象创建一个连接,并指定Access数据库文件的路径和提供程序。然后使用ADODB.Recordset对象执行查询,并在循环中遍历结果集中的数据。
请确保在使用ADODB对象之前在VB项目中添加对ADO库的引用。可以在VB项目中的“工具”菜单下找到“引用”,然后选择Microsoft ActiveX Data Objects Library。
请注意,上面的示例代码中使用的连接字符串是适用于Access 2007及更高版本的.accdb文件的。如果使用旧版本的Access数据库(.mdb文件),需要不同的连接字符串。