vba - MS Access 尝试将 ADODB 记录集设置为从 com 对象返回

Question

我使用 VS 2008 编写了一个共享加载项，其中包含一个返回 ADO 记录集的公共方法。在 MS Access 中，我想将 ADO Recordset 设置为函数调用的返回值。调用 COM 对象时，函数调用执行良好。但是，将 VBA 中的 ADO 记录集分配给函数会返回“编译错误：属性使用无效”。我究竟做错了什么？

Dim result As ADODB.Recordset

result = .Object.doSomething(parameter1, parameter2)

Answer 1

Set分配给对象变量时使用关键字。

Dim result As ADODB.Recordset

Set result = .Object.doSomething(parameter1, parameter2)