具有Implements的类中的私有属性

时间:2018-01-18 12:38:05

标签: vba oop

我正在尝试使用一些面向对象的编程原则,但我不确定我是否做得对。我创建了Interface类,让我们将它命名为lMyInterface并在那里声明对象变量:

Dim rngSource as Range

然后在其他类模块中,我们将其命名为MyClass,我生成的代码如下:

Private Property Set IMyInterface_rngSource(RHS As Variant)
    Set lMeasureByRegion_rngSource = RHS
End Property

我该怎么办?我不能在模块中使用私有属性。我应该在使用IMyInterface_rngSource的MyClass中编写公共属性或函数还是有另一种方法? 我试图找出如何在VBA中使用接口,如果它真的是有用的功能或只是矫枉过正,我将如何受益。

0 个答案:

没有答案