如何遍历类的所有属性？

Question

如何遍历类的所有属性？我上课了。Public Class Foo    Private _Name As String     Public Property Name() As String         Get             Return _Name        End Get         Set(ByVal value As String)             _Name = value        End Set     End Property     Private _Age As String     Public Property Age() As String         Get             Return _Age        End Get         Set(ByVal value As String)             _Age = value        End Set     End Property     Private _ContactNumber As String     Public Property ContactNumber() As String         Get             Return _ContactNumber        End Get         Set(ByVal value As String)             _ContactNumber = value        End Set     End PropertyEnd Class我想循环上面的类的属性。例如;Public Sub DisplayAll(ByVal Someobject As Foo)     For Each _Property As something In Someobject.Properties         Console.WriteLine(_Property.Name & "=" & _Property.value)     NextEnd Sub