51问答网 > Excel，VBA窗体对其共享网络内Access对象字段遍历查询调用、修改、添加或删除。

Excel，VBA窗体对其共享网络内Access对象字段遍历查询调用、修改、添加或删除。

2025-02-25 13:42:55

推荐回答（1个）

回答1：

引用ADO2.8组件
DIM DBConn as new adodb.connection
dim dbrst as new adodb.recordset
dim connstring as string
connstirng="Provider=Microsoft.ACE.OLEDB.12.0;Database=D:\database.accdb"
dbconn.open connstring
dbrst.open "SELECT * FROM 表名",dbconn
dbrst.movefirst
do until dbrst.eof
for i=0 to dbrst.fields.count-1

debug.print dbrst.fields(i).name,dbrst.fields(i).value

next

dbrst.movenext

loop

set dbrst=nothing