Invocar dinámicamente propiedades por nombre de cadena usando VB.NET
Actualmente estoy trabajando en un proyecto donde una sección del código se ve así:
Select Case oReader.Name
Case "NameExample1"
Me.Elements.NameExample1.Value = oReader.ReadString
....
Case "NameExampleN"
Me.Elements.NameExampleN.Value = oReader.ReadString
....
End Select
Continúa por un tiempo. El código es obviamente detallado ysiente como si pudiera mejorarse. ¿Hay alguna manera de invocar dinámicamente una propiedad en VB.NET de modo que se pueda hacer algo como esto?
Dim sReadString As String = oReader.ReadString
Me.Elements.InvokeProperty(sReadString).Value = sReadString