为什么窗体返回的记录集总是DAO呢?

wang1999

为什么窗体的记录集总是DAO记录集呢?(即使没有引用DAO),可不可以将DAO转换成ADO呢?

下面的代码帮助确定在不同情况下，Recordset 属性返回什么类型的记录集。
(引用帮助文档)
Sub CheckRSTType()
    Dim rst As Object

    Set rst = Forms(0).Recordset
    If TypeOf rst Is DAO.Recordset Then
        MsgBox "DAO Recordset"
    ElseIf TypeOf rst Is ADODB.Recordset Then
        MsgBox "ADO Recordset"
    End If
End Sub

zhengjialon

请看帮助中的描述，最后两行：

Recordset 属性
               

您可以使用 Recordset 属性来指定或获得 ADO Recordset 或 DAO Recordset 对象，这些对象代表窗体的记录源。

注意   在 DAO 内，您不能通过 ODBCDirect 记录集类型来使用此属性。

设置

Recordset 属性返回记录集对象，此对象是提供窗体中被浏览的数据的。例如，如果窗体是基于查询产生的，引用 Recordset 属性相当于用同样的查询复制 Recordset 对象。然而，与使用 RecordsetClone 属性不同，对 Form.Recordset 属性的当前改变将自动地反映在窗体的当前记录中。

此属性只有在使用 Visual Basic 时可用。

说明

[B]
在 Microsoft Access 数据库 (.mdb) 中要求使用记录集时， 将返回 DAO 记录集，在 Microsoft Access 项目 (.adp) 中要求使用记录集时，将返回 ADO 记录集。
[/B]