vba - 无效使用属性(property)？

Question

我正在使用 Access 数据库，它背后有一个表单和 VBA。自从我涉足 VBA 以来已经有一段时间了，我的 google-fu 现在让我失望了，所以请耐心等待。

我创建了一个简单的类，但出现编译错误:

Dim oRecordSet As ADODB.RecordSet
Public Property Get RecordSet() As ADODB.RecordSet
    RecordSet = oRecordSet '' error here
End Property

Public Property Let RecordSet(ByVal val As ADODB.RecordSet)
    RecordSet = val
End Property

我还有其他几个相同的属性(显然是不同的名称/变量)，它们编译得很好；他们的类型是 String和 Integer .

我错过了什么？谢谢!

还有一个旁注，当我编码时，智能感知显示 ADODB.Recordset ，但在自动格式化(回车、编译等)时，它将其更改为 ADODB.RecordSet .我需要担心吗？

Answer 1

它应该是:

Public Property Get RecordSet() As ADODB.RecordSet
    Set RecordSet = oRecordSet '' error here
End Property