声明连接字符串vb6 ADODC时出错91

Question

我做错了什么？

Public Function getRecords(query As String) As Adodc
    With Adodc1
        .RecordSource = query
        .Refresh
    End With
    getRecords = Adodc1
End Function

在行getRecords = Adodc1中显示错误，但不显示错误或错误91。

本代码以包含Adodc1 Control for ADODC对象的形式编写。

Answer 1

Rob解决方案： 设置getRecords = Adodc1