http://stackoverflow.com/questions/531384/how-to-loop-through-all-the-properties-of-a-class

reflection.cs

Type type = obj.GetType();
PropertyInfo[] properties = type.GetProperties();

foreach (PropertyInfo property in properties)
{
    Console.WriteLine("Name: " + property.Name + ", Value: " + property.GetValue(obj, null));
}

reflection.vb

Dim type As Type = obj.[GetType]()
Dim properties As PropertyInfo() = type.GetProperties()

For Each [property] As PropertyInfo In properties
	Console.WriteLine("Name: " + [property].Name + ", Value: " + [property].GetValue(obj, Nothing))
Next