型パラメーターとして渡されたクラスの共有プロパティにアクセスする方法

Question

型パラメーター化されたプロシージャーにパラメーターとして渡されるクラスの共有プロパティーにアクセスしようとしています。 理由私はこれをやっているので、クラス内のプロパティとして（他のクラス固有のものの中でも）さまざまなAPIコールエンドポイントを埋め込むことができます。私はいくつかの同様のSOの記事を読んだが、それは可能ではないことを確かめるために十分近いものはない（私はそう思われる）。

以下

は、構造の本質である - 終わりに向かっていくつかの擬似コードがあります：私の小さな頭に

MustInherit Class BaseClass 

    Shared Property Endpoint As String 
End Class 

Class Person 
    Inherits BaseClass 

    Property Age As Integer 
    Property Name As String 
    Sub New() 
    _Endpoint = "/GetPerson" 
    End Sub 
End Class 

Class Event 
    Inherits BaseClass 

    Property When As Date 
    Property Type As String 
    Sub New() 
    _Endpoint = "/GetEvent" 
    End Sub 
End Class 

Function Retrieve(T As BaseClass)(Id As String) As T 

    Dim oResp As HttpResponse = MakeGetCall(T.Endpoint, Id) <- T.Endpoint throws a compile error 
    Return Deserialize(Of T)(oResp.Content) 
End Function 

Dim oPerson As Person = Retrieve(Of Person)("123") 
Dim oEvent As Event = Retrieve(Of Event)("123") 

、私はTのため、基本クラスのプロパティを含むBaseClassである、と考えているだろうEndpoint、私は大丈夫でしょう。しかし一見そうではありません。

私はSOや他の場所でこれを無駄に克服するためにここからかなりのものを試しました。はい、私はTのタイプに基づいて何らかのエンドポイントルックアップを実行できることを認識していますが、上記は非常にきれいな解決策であり、可能ならばそれを働かせたいと思います。

アイデア？

Answer 1

あなたは各サブクラスごとに異なるようにEndPointをしたいと仮定すると、あなたは

MustInherit Class BaseClass 
    Public MustOverride Property EndPoint As String 
End Class 

は次に、各サブクラスで定数を返す...代わり Sharedの MustOverrideを使用する必要があります

Class Person 
    Inherits BaseClass 
    Public Overrides Property EndPoint As String 
    Get 
     Return "/Person" 
    End Get 

あなたがしたい場合があります

EndPointをReadOnlyと宣言してください。

EndPointにアクセスするには、クラスのインスタンスが必要です（Sharedではないため）。パラメータのないコンストラクタがある場合は、必要に応じて(New Person).EndPointを使用できます。