vb.net - 我可以覆盖接口(interface)属性吗？

Question

Shell 示例如下。基本上，我希望客户和员工从 IPerson 实现 SSN 属性。但是，我希望客户能够获取和设置(这不是问题)，但我希望员工只能获取。

Public Interface IPerson
    Property SSN As String
End Interface

Public Class Client
    Implements IPerson
    Public Property SSN As String Implements AELName.IPerson.SSN
        Get
            Return _SSN
        End Get
        Set(value As String)
            _SSN = value
        End Set
    End Property
End Class

Public Class Employee
    Implements IPerson
    Public Readonly Property SSN As String Implements AELName.IPerson.SSN
        Get
            Return _SSN
        End Get
    End Property
End Class

员工生成错误“‘SSN’无法实现‘SSN’，因为接口(interface)‘IPerson’上没有匹配的属性”。有没有一种简单的方法来覆盖员工的 SSN 实现？

Answer 1

您可以实现一个空的Set - 一个不更新任何内容的集合。

Public Class Employee
    Implements IPerson
    Public Readonly Property SSN As String Implements AELName.IPerson.SSN
        Get
            Return _SSN
        End Get
        Set
            ' Make read only for Employee
        End Set
    End Property
End Class