propriété d'accès en utilisant son nom dans vb.net

Question

Par exemple:

Sub Test() 
    Dim car as new MyCar 
    car.chassis.wheel.radius = 15 
    Console.WriteLine(car.chassis.wheel.radius)  
End Sub 

Alors question. Est-il possible d'accéder à la propriété en utilisant son nom de chaîne comme Quelque chose ("car.chassis.wheel.radius") = 15?

Answer 1

Vous pouvez, mais pas aussi concis que dans votre question.

Cette fonction obtiendra n'importe quelle propriété d'un objet par son nom.

Public Function GetPropertyValue(ByVal obj As Object, ByVal PropName As String) As Object 
    Dim objType As Type = obj.GetType() 
    Dim pInfo As System.Reflection.PropertyInfo = objType.GetProperty(PropName) 
    Dim PropValue As Object = pInfo.GetValue(obj, Reflection.BindingFlags.GetProperty, Nothing, Nothing, Nothing) 
    Return PropValue 
End Function 

Je laisse la gestion des erreurs à vous. Et les conséquences :)

Answer 2

Oui, vous pouvez très facilement:

Dim radius As Integer = CallByName(car.chassis.wheel, "radius", Microsoft.VisualBasic.CallType.Get, Nothing) 

Voir this Microsoft page pour référence.