使用 VB.net 反序列化 XML

Question

我成功地反序列化了这个 XML，但是当我添加元数据部分时，如下所示，我不知道如何在代码中反序列化它。我的意思是我不知道如何构建我的类属性、方法、属性标签等。

我尝试了许多组合，但反序列化后元数据在我的课堂上仍然是空的。甚至不确定我是否在问正确的问题，而且我的代码有点冗长。我尝试在此处粘贴它，但它说它太长了，所以我不知道如何粘贴所有内容以供任何人查看。

<?xml version="1.0" encoding="utf-8"?>
<MainMenu xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <MenuItems MenuGroup="Boilers">
    <SubMenuItem>
      <GUID>3ec6e759-270f-4cd1-a9b8-07b4c227d47b</GUID>
      <ComponentType>Boiler:HotWater</ComponentType>
      <DefaultName>Boiler - Hot Water</DefaultName>
      <EquipmentUsage>Supply</EquipmentUsage>
      <Picture>iVBORw0KGgoAAAANSUhEUgAAAEYAAABGCAYAAABxLuKEAAAABGdBTUEAALGPC/xhBQAABFdJREFUeF7tm89PE1EQx9vyQ8SCNSLWH5BGDWli1CKGFBRFMYgJBxIvmHggMfHcxANcSI8c/TM8cuTIyXD<Picture>
      <ImageName>hot_water_boiler</ImageName>
    </SubMenuItem>
    <SubMenuItem>
      <GUID>1a4ee747-c11b-4687-be41-73680c104934</GUID>
      <ComponentType>Boiler:Steam</ComponentType>
      <DefaultName>Boiler - Steam</DefaultName>

<!-- How to deserialize this Metadata section? -->

      <Metadata>
        <MetadataItem>
          <description>Design Flow Rate {m3/s}</description>
          <value>Autosize</value>
        </MetadataItem>
        <MetadataItem>
          <description>Design Pump Head {Pa}</description>
          <value>179352</value>
        </MetadataItem>
      </Metadata>

      <EquipmentUsage>Supply</EquipmentUsage>
      <Picture>iVBORw0KGgoAAAANSUhEUgAAAEYAAABGCAYAAABxLuKEAAAABGdBTUEAALGPC/xhBQAABFdJREFUeF7tm89PE1EQx9vyQ8SCNSLWH5BGDWli1CKGFBRFMYgJBxIvmHggMfHcxANcSI8c/TM8cuTIyXD0yNGjR44e1/mU3bK7vIVd7Nvuq2+ST3ZT2O7M972ZnX27zVmzZs1aj1peKLj0JcA7huN7y7a3t53NzU2<Picture>
      <ImageName>hot_water_boiler</ImageName>
    </SubMenuItem>
  </MenuItems>
</MainMenu>

我添加了列表属性的代码，

<XmlType("MenuItem")>
Public Class PECSubMenuItem

'NOTE: By NOT specifing any custom Metadata Attributes, fields will be created as an element by default.
 Private mGUID As String
 Private mPicture As Bitmap
 Private mMenuGroup As String
 Private mComponentType As String
 Private mDefaultName As String
 Private mImageName As String
 Private mEquipmentUsage As String
 Private mMetadataList As List(Of MetadataItem)
 Public Enum EquipUsage
  Supply = 0
  Demand = 1
  Both = 2
 End Enum
 Public Sub New()
  mGUID = System.Guid.NewGuid.ToString
  mMetadataList = New List(Of MetadataItem)
 End Sub
 <XmlElement("Metadata")>
 Public Property Metadata As List(Of MetadataItem)

  Get
   Return mMetadataList
  End Get
  Set(ByVal value As List(Of MetadataItem))
   mMetadataList = value
  End Set

 End Property

我为新课程添加的代码。

<XmlType("MetadataItem")>
Public Class MetadataItem

 Private mvalue As String
 Private mdescription As String
 <XmlElement("description")>
 Public Property description As String

  Get
   Return mdescription
  End Get
  Set(ByVal value As String)
   mdescription = value
  End Set

 End Property
 <XmlElement("value")>
 Public Property value As String

  Get
   Return mvalue
  End Get
  Set(ByVal value As String)
   mvalue = value
  End Set

 End Property

End Class

Answer 1

您需要另一个名为 Metadata 或 MetadataItem 的类：

<XmlType("MetadataItem")>
Public Class MetadataItem

    <XmlElement("description")>
    Public Property Description As String

    <XmlElement("value")>
    Public Property Value As String

    Public Sub New()
    End Sub

    Public Sub New(ByVal Description As String, ByVal Value As String)
        Me.Description = Description
        Me.Value = Value
    End Sub
End Class

然后在父类中，您需要一个属性，它是MetadataItem 类的列表。使用XmlArray 和XmlArrayItem 属性指定列表及其项目的名称：

<XmlArray("Metadata"), XmlArrayItem("MetadataItem")>
Public Property Metadata As List(Of MetadataItem)

---

您的 XML 也有问题：<Picture> 标记永远不会关闭。

现在你的 XML 看起来像：

<Picture>...<Picture>

但它应该看起来像：

<Picture>...</Picture>