protegidas fijado en VB.Net para una propiedad definida en una interfaz

Question

Hemos una interfaz, que puede ser extremadamente simplificada como:

public interface IPersistable<T> 
{ 
    T Id { get; } 
} 

mayoría de los lugares que implementan la interfaz desea tenerlo de manera que hay una protegida o conjunto privado en esa propiedad, es decir, en C#:

public class Foo : IPersistable<int> 
{ 
    public int Id { get; protected set; } 
} 

sin embargo, no se puede conseguir cualquier código de ejemplo para compilar VB.Net que sigue el mismo patrón, mientras que todavía implementación de la interfaz, por lo que:

Public Class Foo 
    Implements IPersistable(Of Integer) 

    Public Property Id() As Integer Implements IPersistable(Of Integer).Id 
     Get 
      Throw New NotImplementedException() 
     End Get 
     Protected Set(ByVal value As Integer) 
      Throw New NotImplementedException() 
     End Set 
    End Property 
End Class 

... no se compilará, pero esto sería:

Public Class Foo 
    Public Property Id() As Integer 
     Get 
      Throw New NotImplementedException() 
     End Get 
     Protected Set(ByVal value As Integer) 
      Throw New NotImplementedException() 
     End Set 
    End Property 
End Class 

Soy consciente de que este ejemplo es demasiado trivial, y que, posiblemente, puede lograrse mejor a través de constructores protegidas, pero me interesa si puede ser hecho de esta manera?

[EDIT:] ... y obviamente, si un tipo desea utilizar XMLSerialization, entonces las propiedades necesitarían ser de lectura/escritura pública o los tipos requerirían serializadores personalizados escritos para cada uno.

Básicamente, veo que la interfaz debe definir la accesibilidad mínima, pero VB la interpreta como la accesibilidad exacta.

Answer 1

Sí, tendrá que implementar la interfaz literalmente. Una posible solución consiste en publicar la propiedad de la clase con otro nombre:

Public Class Foo 
    Implements IPersistable(Of Integer) 
    Private m_Id As Integer 

    Public ReadOnly Property Id() As Integer Implements IPersistable(Of Integer).Id 
    Get 
     Return m_Id 
    End Get 
    End Property 

    Protected Property IdInternal() As Integer 
    Get 
     Return m_Id 
    End Get 
    Set(ByVal value As Integer) 
     m_Id = value 
    End Set 
    End Property 
End Class 

declarar la propiedad Overridable si la intención de anularlo en las clases derivadas.

Answer 2

Actualmente no es compatible con el idioma, ni lo hará en Visual Basic 10 (es decir, la versión con Visual Studio 2010). Hay un wishlist item for exactly this. Hasta entonces, las soluciones alternativas sugeridas por nobugz son la única opción.

Answer 3

Las propiedades de la interfaz solo pueden implementarse mediante propiedades de clase que coincidan. Esto es cierto tanto en vb.net como en C#. Lo que es diferente en los dos idiomas es que la característica implícita de implementación de interfaz de C# definirá automáticamente una propiedad de solo lectura o de solo escritura para implementar una interfaz si está disponible una propiedad pública de lectura y escritura del mismo nombre.

Answer 4

A partir del Visual Basic 14, su primer ejemplo de código VB compila bien.