- 如果是使用ADO(或者ADO控件),请使用"Microsoft.Jet.OLEDB.4.0"- 如果是使用DAO,请使用"Microsoft DAO 3.6 Object Library."- 如果是使用一般的Data-Control,你需要用DAO 3.6打开集合联接到Data控件的Source上,如下:   Option Explicit
   Private daoDB36 As Database
   Private rs As DAO.Recordset
   Dim sPath As String   Private Sub Form_Load()
   sPath = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb"
   Set daoDB36 = DBEngine.OpenDatabase(sPath)
   Set rs = daoDB36.OpenRecordset("Customers")
   Set Data1.Recordset = rs
   End Sub