表达式的类型为“FileName”，它不是集合类型

Question

好的，由于我无法就我发现这个问题的原始问题发表评论并实际寻求帮助，所以我正在为它制作一个新问题（原件：How do I get the value from a specific node in an XML file?）

这是我的两个课程；一个是我的 XML 文件的结构，第二个是一个列表：

Public Class Member
 Public Naam As String
 Public Kills As Integer
 Public Deaths As Integer
 Public KD As Integer
End Class

Public Class Tabel
 <XmlElement("Member")> _
 Public Members As List(Of Member)
End Class  

这是执行它的代码：

Dim serializer As XmlSerializer = New XmlSerializer(GetType(Tabel))
Dim tabel As Tabel = CType(serializer.Deserialize(File.OpenRead("C:\members.xml")), Tabel)
For Each member As Member In tabel
    Dim kills As Integer = member.Kills
Next  

它应该只是循环遍历 xml 文件并按照它应该做的那样做，但是它在 For Each 循环中的最后一个变量的“表”上出错。说：表达式是'VBTest.tabel'类型，不是集合类型。

提前致谢！

Answer 1

您需要将Members 属性声明为New 对象，否则会出错。如果您使用什么外部 xml 元素来保存集合，请省略 <XmlElement("Member")>。

Public Class Tabel
  '<XmlElement("Member")>
  Public Property Members As New List(Of Member)
End Class

输出：

<?xml version="1.0" encoding="utf-8"?>
<tebel xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <Members>
    <Member>
      <Id>1</Id>
    </Member>
  </Members>

如果你把它们加起来，那么你需要循环外的变量。

Dim kills As Integer
For Each member As Member In tabel.Members
  kills += member.Kills
Next