使用vb.net读取xml文件

显示所有数据。

Dim xn As XmlNode = xmlDoc.SelectSingleNode("bookstore")
Dim xnl As XmlNodeList = xn.ChildNodes
Dim xnf As XmlNode
For Each xnf In xnl
Dim xe As XmlElement = CType(xnf, XmlElement)
Console.WriteLine(xe.GetAttribute("genre")) '显示属性值 
Console.WriteLine(xe.GetAttribute("ISBN"))
Dim xnf1 As XmlNodeList = xe.ChildNodes
Dim xn2 As XmlNode
For Each xn2 In xnf1
Console.WriteLine(xn2.InnerText) '显示子节点点文本 
Next xn2
Next xnf