В настоящее время я работаю над проектом, где часть кода выглядит так:
Select Case oReader.Name
Case "NameExample1"
Me.Elements.NameExample1.Value = oReader.ReadString
....
Case "NameExampleN"
Me.Elements.NameExampleN.Value = oReader.ReadString
....
End Select
Это продолжается некоторое время. Код явно многословный, и кажется, что он может быть улучшен. Есть ли способ динамически вызывать свойство в VB.NET, чтобы можно было сделать что-то подобное:
Dim sReadString As String = oReader.ReadString
Me.Elements.InvokeProperty(sReadString).Value = sReadString