在VB.NET上仅反映派生类的子属性

时间:2012-10-24 13:17:55

标签: vb.net oop reflection

我正在尝试使用Reflection来序列化从另一个继承的类的属性,但我想仅序列化子类的属性,而不是父类的属性。我怎么能这样做?

这就是我正在做的事情,不幸的是,它正在获得父类的所有属性,正如人们所期望的那样:

    Public Function SaveData() As System.Collections.Generic.List(Of System.Xml.Linq.XElement) Implements Interfaces.ICustomXMLSerialization.SaveData

        Dim elements As New List(Of System.Xml.Linq.XElement)
        Dim ci As CultureInfo = CultureInfo.InvariantCulture

        With elements

            Dim props As PropertyInfo() = Me.GetType.GetProperties()
            For Each prop As PropertyInfo In props
                If TypeOf Me.GetType.GetProperty(prop.Name).PropertyType Is IList Then
                    .Add(New XElement(prop.Name, DWSIM.App.ArrayToString(Me.GetType.GetProperty(prop.Name).GetValue(Me, Nothing), ci)))
                ElseIf TypeOf Me.GetType.GetProperty(prop.Name).GetValue(Me, Nothing) Is Double Then
                    .Add(New XElement(prop.Name, Double.Parse(Me.GetType.GetProperty(prop.Name).GetValue(Me, Nothing)).ToString(ci)))
                Else
                    .Add(New XElement(prop.Name, Me.GetType.GetProperty(prop.Name).GetValue(Me, Nothing)))
                End If
            Next

        End With

        Return elements

    End Function

提前致谢, 丹尼尔

1 个答案:

答案 0 :(得分:5)

您需要将BindingFlags.DeclaredOnly指定为GetProperties来电的参数。

但是,经常会遇到使用这些标志的问题,因此可能需要进行一些实验才能找到所需标记的确切组合。枚举的MSDN描述为here