Как создать общее свойство в VB.NET?

Question

Я хотел бы сделать что-то вроде этого:

Private _myCollection As IList(Of T) 
Public Property MyProperty(Of T)() as IList(Of T) 
    Get 
     Return Me._myCollection 
    End Get 
    Set(ByVal value As String) 
     Me._myCollection = value 
    End Set 
End Property 

В принципе, я хочу иметь коллекцию предметов, которые могут быть любого типа. Тогда я смогу сделать что-то вроде этого:

Dim myPropertyValue as <the type of some value> 
if (MyProperty.Contains(<some value>)) 
    myPropertyValue = CType(MyProperty(<some value>), <the type of some value>) 

Как это сделать? Или есть лучший способ, чем использовать общий тип?

Answer 1

Вы, возможно, придется создать общий класс, чтобы сделать это

Public Class MyClass(Of T) 
    Private _myCollection As IList(Of T) 
    Public Property MyProperty() as IList(Of T) 
     Get 
      Return Me._myCollection 
     End Get 
     Set(ByVal value As String) 
      Me._myCollection = value 
     End Set 
    End Property 
End Class 

Answer 2

Если вы не хотите, чтобы конвертировать ваши whole class to a generic one вы можете также добавить общие процедуры к классу (см MSDN):

Public Function GetMyProperty(Of T) As T 
    .... 
End Function 
Public Sub SetMyProperty(value as T) 
    ... 
End Sub 

Но это не так элегантно, как свойства.