asp.net - tipos - repetir en visual basic

¿Cómo iterar a través de cada propiedad de un objeto vb.net personalizado?

Question

¿Cómo puedo ver cada una de las propiedades en mi objeto personalizado? No es un objeto de colección, pero ¿hay algo como esto para los objetos que no son de colección?

For Each entry as String in myObject
    '' Do stuff here...
Next

Hay cadenas, enteros y propiedades booleanas en mi objeto.

Answer 1

Al usar la reflexión puedes hacer eso. En C # se ve así;

PropertyInfo[] propertyInfo = myobject.GetType().GetProperties();

Se agregó una traducción de VB.Net:

Dim info() As PropertyInfo = myobject.GetType().GetProperties()

Answer 2

Puede usar el espacio de nombres System.Reflection para consultar información sobre el tipo de objeto.

For Each p As System.Reflection.PropertyInfo In obj.GetType().GetProperties()
   If p.CanRead Then
       Console.WriteLine("{0}: {1}", p.Name, p.GetValue(obj, Nothing))
   End If
Next

Tenga en cuenta que no se recomienda utilizar este enfoque en lugar de colecciones en su código. La reflexión es una actividad de alto rendimiento y debe usarse con prudencia.

Answer 3

Puede usar la reflexión ... Con Reflection puede examinar a cada miembro de una clase (un Type), professions, métodos, constructores, campos, etc.

using System.Reflection;

Type type = job.GetType();
    foreach ( MemberInfo memInfo in type.GetMembers() )
       if (memInfo is PropertyInfo)
       {
            // Do Something
       }

Answer 4

System.Reflection es "heavy-weight", siempre implemento un método más ligero primero ...

//DO#

if (item is IEnumerable) {
    foreach (object o in item as IEnumerable) {
            //do function
    }
} else {
    foreach (System.Reflection.PropertyInfo p in obj.GetType().GetProperties())      {
        if (p.CanRead) {
            Console.WriteLine("{0}: {1}", p.Name, p.GetValue(obj,  null)); //possible function
        }
    }
}

''VB.Net

  If TypeOf item Is IEnumerable Then

    For Each o As Object In TryCast(item, IEnumerable)
               ''Do Function
     Next
  Else
    For Each p As System.Reflection.PropertyInfo In obj.GetType().GetProperties()
         If p.CanRead Then
               Console.WriteLine("{0}: {1}", p.Name, p.GetValue(obj, Nothing))  ''possible function
          End If
      Next
  End If