如何在vb.net中解析xml字符串

Imports System.Xml

Module Module1
    Sub Main()
        Dim xmlString As String = "<root><person name=""John"" age=""30"">Hello, World!</person></root>"

        Dim xmlDoc As New XmlDocument()
        xmlDoc.LoadXml(xmlString)

        Dim root As XmlNode = xmlDoc.DocumentElement

        For Each childNode As XmlNode In root.ChildNodes
            Dim attributeName As String = childNode.Attributes("name").Value
            Dim attributeAge As String = childNode.Attributes("age").Value
            Dim textContent As String = childNode.InnerText

            Console.WriteLine("Name: " & attributeName)
            Console.WriteLine("Age: " & attributeAge)
            Console.WriteLine("Text Content: " & textContent)
        Next

        Console.ReadLine()
    End Sub
End Module

Name: John
Age: 30
Text Content: Hello, World!