Question

我希望通过让Dim IDNumbers() As String = 'SOMETHING'这样的代码来改善我的代码，而不是像{"0", "1", "2", "3", "4"}这样单独写出字符串列表。我希望能够从我的XML文件中读取所有ID，学生姓名和生日节点，而不必亲自去列出它们。如果有人可以帮助提供示例代码，那我就不确定如何做到这一点。这样做的原因是，如果我修改文件中的代码，也必须在vb代码中进行更改。

Answer 1

尝试以下操作：

Imports System.Xml
Imports System.Xml.Linq
Imports System.Globalization
Module Module1
    Const FILENAME As String = "c:\temp\test.xml"
    Sub Main()
        Dim doc As XDocument = XDocument.Load(FILENAME)

        Dim results = doc.Descendants("student").Select(Function(x) New With { _
                                                            .id = CType(x.Element("ID"), string), _
                                                            .name = CType(x.Element("student_name"), string), _
                                                            .birthday = CType(x.Element("birthday"), string) _
                                                        }).ToList()

    End Sub

End Module

推广正则表达式XML验证

1 个答案: