Property-Wert über Namen abrufen

11/07/2008 - 07:21 von Karsten Sosna | Report spam
Hallo NG,
ich möchte gerne einen Eigenschaftswert über den Namen einer Eigenschaft
abrufen. Beispiel:
\\\
Private _Width As Single
Private _Height As Single

Public Property Width() As Single
Get
Return _Width
End Get
Set(ByVal value As Single)
_Width = value
End Set
End Property

Public Property Height() As Single
Get
Return _Height
End Get
Set(ByVal value As Single)
_Height = value
End Set
End Property
'
Dim result As Single = GetValue("Width") * GetValue("Height") '<< Pseudo
///
Auch ein Setzen der Eigenschaft wàre nicht schlecht hat aber im Moment
keinen Vorrang.

Vielen Dank für jeden Tipp.
Gruß Scotty
 

Lesen sie die antworten

#1 Karsten Sosna
11/07/2008 - 07:33 | Warnen spam
ich möchte gerne einen Eigenschaftswert über den Namen einer Eigenschaft
abrufen.



Ich sag es ja, die schnellste Antwort erhàlt man, wenn man erstmal das
Posting abgeschickt hat. ;=)
\\\
Dim shp As New ShapeClass
shp.Width = 100
shp.Height = 50
Dim pi = shp.GetType.GetProperty("Width")
Console.WriteLine(pi.Name)
Console.WriteLine(pi.GetValue(shp, Nothing))
///
Auch ein Setzen der Eigenschaft wàre nicht schlecht hat aber im Moment
keinen Vorrang.


\\\
pi.SetValue(shp, 80, Nothing)
pi = shp.GetType.GetProperty("Width")
Console.WriteLine(pi.Name)
Console.WriteLine(pi.GetValue(shp, Nothing))
///
Gruß Scotty

Ähnliche fragen