Comment rendre une propriété d'interface facultative en lecture seule dans VB.NET?

Question

Ceci est une suite à une question précédente que j'avais sur les interfaces. J'ai reçu une réponse que j'aime, mais je ne suis pas sûr de savoir comment l'implémenter dans VB.NET.

question précédente:

Should this property be part of my object's interface?

public interface Foo{ 
    bool MyMinimallyReadOnlyPropertyThatCanAlsoBeReadWrite {get;} 
} 

Comment puis-je parvenir avec la syntaxe VB.NET? Pour autant que je sache, ma seule option est de marquer la propriété comme étant ReadOnly (je ne peux pas implémenter le setter) ou non (je dois implémenter le setter).

Answer 1

Définissez simplement le getter dans une interface et créez une seconde interface qui possède à la fois le getter et le setter. Si votre classe concrète est mutable, faites-la implémenter la deuxième interface. Dans votre code qui traite de la classe, vérifiez qu'il s'agit d'une instance de la deuxième interface, cast si c'est le cas, puis appelez le setter.

Answer 2

En VB.NET je mettre en œuvre ainsi:

Public Interface ICanBeSecure 

    ReadOnly Property IsSecureConnection() As Boolean 
End Interface 

Public Interface IIsSecureable 
    Inherits ICanBeSecure 

    Shadows Property IsSecureConnection() As Boolean 
End Interface