4

我正在使用 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. 我需要担心吗？

4

1 回答 1

7

它应该是：

Public Property Get RecordSet() As ADODB.RecordSet
    Set RecordSet = oRecordSet '' error here
End Property
于 2012-05-07T05:08:58.073 回答