Gerardo,
No indicás si querés consultar las propiedades públicas o todas. Un
ejemplo básico sería así:
Imports System.Reflection
Public Class VisorPropiedades
Shared Sub Main()
Dim visor As New VisorPropiedades
Dim unObjetoCualquiera As New TimeSpan(1, 30, 0)
visor.MostrarPropiedadesObjeto(unObjetoCualquiera)
Console.ReadLine()
End Sub
Public Sub MostrarPropiedadesObjeto(ByVal objeto As Object)
If objeto Is Nothing Then
Throw New ArgumentNullException("objeto")
End If
Dim propiedad As String
Dim valor As Object
For Each prop As PropertyInfo In objeto.GetType().GetProperties()
propiedad = prop.Name
valor = prop.GetValue(objeto, Nothing)
Console.WriteLine("{0}={1}", propiedad, valor)
Next
End Sub
End Class
Si querés incluir las propiedades no públicas, investigá la
sobrecarga del método GetProperties() que acepta un parámetro del tipo
BindingFlags.
Un saludo.
_____
De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Gerardo Cavallini
Enviado el: Martes, 26 de Febrero de 2008 07:35 p.m.
Para: [email protected]
Asunto: [puntonet] Listar propiedades de un Objeto
Buenas, necesito recorrer todas las proiedades de un objeto para ir tomando
los valores que tienen y no encuentro como recorrer las propiedades.
Alguien se le ocurre como hacelo en Vb.net
Gracias
Gerardo Cavallini
