Прочтите ваш вопрос еще раз и получите немного больше понимания:)
http://msdn.microsoft.com/en-us/library/aa332493(v=vs.71).aspx
Вы можете использовать это, чтобы получить свойства объекта:
Public Shared Sub Main()
Dim myType As Type = GetType(MyTypeClass)
' Get the public properties.
Dim myPropertyInfo As PropertyInfo() = myType.GetProperties((BindingFlags.Public Or BindingFlags.Instance))
Console.WriteLine("The number of public properties is {0}.", myPropertyInfo.Length.ToString())
' Display the public properties.
DisplayPropertyInfo(myPropertyInfo)
End Sub 'Main
Public Shared Sub DisplayPropertyInfo(ByVal myPropertyInfo() As PropertyInfo)
' Display the information for all properties.
Dim i As Integer
For i = 0 To myPropertyInfo.Length - 1
Dim myPropInfo As PropertyInfo = CType(myPropertyInfo(i), PropertyInfo)
Console.WriteLine("The property name is {0}.", myPropInfo.Name.ToString())
Console.WriteLine("The property type is {0}.", myPropInfo.PropertyType.ToString())
Next i
End Sub 'DisplayPropertyInfo
Надеюсь, это поможет!