应该可以呀 连接的方法 跟vb连接数据库一模一样
一个例子
（前提：添加ADO 控件）
Dim Conn As ADODB.Connection
Dim Rst2 As ADODB.Recordset
Set Conn = CurrentProject.Connection
Set Rst2 = New ADODB.Recordset
Rst2.Open "sql语句", Conn, adOpenForwardOnly, adLockReadOnly
If Rst2.EOF Then
MsgBox ("NO")
Exit Sub
End If
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024