Jak przechodzić między wszystkimi właściwościami klasy?

Question

Mam zajęcia.

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 Property 


End Class 

Chcę przejść przez właściwości powyższej klasy. eg;

Public Sub DisplayAll(ByVal Someobject As Foo) 
    For Each _Property As something In Someobject.Properties 
     Console.WriteLine(_Property.Name & "=" & _Property.value) 
    Next 
End Sub 

Answer 1

użyć refleksji:

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

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

EDIT: Można także określić wartość BindingFlags do type.GetProperties():

BindingFlags flags = BindingFlags.Public | BindingFlags.Instance; 
PropertyInfo[] properties = type.GetProperties(flags); 

To ograniczy zwróconych właściwości do właściwości instancji publicznych (z wyłączeniem właściwości statycznych , chronione właściwości, itp.).

Nie trzeba podawać BindingFlags.GetProperty, należy użyć tego podczas wywoływania type.InvokeMember(), aby uzyskać wartość właściwości.

Answer 2

VB wersja C# podany przez Brannon:

Public Sub DisplayAll(ByVal Someobject As Foo) 
    Dim _type As Type = Someobject.GetType() 
    Dim properties() As PropertyInfo = _type.GetProperties() 'line 3 
    For Each _property As PropertyInfo In properties 
     Console.WriteLine("Name: " + _property.Name + ", Value: " + _property.GetValue(Someobject, Nothing)) 
    Next 
End Sub 

Korzystanie wiążące flagi zamiast linii nr 3

Dim flags As BindingFlags = BindingFlags.Public Or BindingFlags.Instance 
    Dim properties() As PropertyInfo = _type.GetProperties(flags) 

Answer 3

Zauważ, że jeśli obiekt mówisz ma niestandardowy model własności (na przykład DataRowView itp. dla DataTable), należy użyć TypeDescriptor; Dobrą wiadomością jest to, że nadal działa dobrze na regularnych zajęciach (a nawet może być much quicker than reflection):

foreach(PropertyDescriptor prop in TypeDescriptor.GetProperties(obj)) { 
    Console.WriteLine("{0} = {1}", prop.Name, prop.GetValue(obj)); 
} 

ta zapewnia także łatwy dostęp do takich rzeczy jak TypeConverter do formatowania:

string fmt = prop.Converter.ConvertToString(prop.GetValue(obj)); 

Answer 4

Odbicie jest dość " ciężki”

Być może spróbować tego rozwiązania: // C#

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 

Odbicie spowalnia +/- 1000 x szybkość wywołania metody pokazanej na The Performance of Everyday Things

Answer 5

private void ResetAllProperties() 
    { 
     Type type = this.GetType(); 
     PropertyInfo[] properties = (from c in type.GetProperties() 
            where c.Name.StartsWith("Doc") 
            select c).ToArray(); 
     foreach (PropertyInfo item in properties) 
     { 
      if (item.PropertyType.FullName == "System.String") 
       item.SetValue(this, "", null); 
     } 
    } 

I stosowana blok kodu powyżej przywrócić wszystkie właściwości ciągów w moim obiekcie kontroli użytkownika sieci Web, które nazwy zaczynają się od "Doc".

Answer 6

Oto kolejny sposób to zrobić przy użyciu lambda LINQ:

C#:

SomeObject.GetType().GetProperties().ToList().ForEach(x => Console.WriteLine($"{x.Name} = {x.GetValue(SomeObject, null)}")); 

VB.NET:

SomeObject.GetType.GetProperties.ToList.ForEach(Sub(x) Console.WriteLine($"{x.Name} = {x.GetValue(SomeObject, Nothing)}")) 

Answer 7

To jak to zrobić.

foreach (var fi in typeof(CustomRoles).GetFields()) 
{ 
    var propertyName = fi.Name; 
}