Rufen Sie Eigenschaften mithilfe von VB.NET dynamisch nach dem Namen der Zeichenfolge auf
Ich arbeite gerade an einem Projekt, in dem ein Teil des Codes so aussieht:
Select Case oReader.Name
Case "NameExample1"
Me.Elements.NameExample1.Value = oReader.ReadString
....
Case "NameExampleN"
Me.Elements.NameExampleN.Value = oReader.ReadString
....
End Select
Es geht noch eine Weile weiter. Der Code ist offensichtlich ausführlich und esfühlt sich wie es könnte verbessert werden. Gibt es eine Möglichkeit, eine Eigenschaft in VB.NET dynamisch aufzurufen, sodass etwa Folgendes ausgeführt werden kann:
Dim sReadString As String = oReader.ReadString
Me.Elements.InvokeProperty(sReadString).Value = sReadString