Question

我的课程MyVisible有一个属性 Visible 。

我有一个实现接口MySuperVisible的课程ISuperVisible，其中还包含属性 Visible 。

如何在“MySuperVisible”类中实现“ISuperVisible”接口的“Visible”属性？

Class MySuperVisible
  Inherits MyVisible
  Implements ISuperVisible

... 

Private Property PrivatePropertyPlaceholder Implements ISuperVisible.Visible
  Get
    Return MyBase.Visible
  End Get
  Set
    MyBase.Visible = value
  End Set
End Property

是实现私有财产的唯一解决方案吗？

PS。 MySuperVisible继承了MyVisible，所以我需要实现一个已存在于基类中的属性。

Answer 1

有趣的问题。我认为Shadows关键字可能是适当的方式。这使得事情比PrivatePropertyPlaceholder更明确：

Public Shadows Property Visible As Boolean Implements ISuperVisible.Visible
    Get
        Return MyBase.Visible
    End Get
    Set(value As Boolean)
        MyBase.Visible = value
    End Set
End Property

在VB.NET中实现属性

1 个答案: