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，但是在autoformat（回车，编译等）上，它会将其更改为ADODB.RecordSet。需要我担心吗？

Answer 1

应该是：

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

无效使用财产？

1 个答案: