使用vb.net 修改xml文件中的数据

修改节点：将genre属性值为“李赞红“的节点的genre值改为“update李赞红”，将该节点的子节点<author>的文本修改为“亚胜”。

Dim nodeList As XmlNodeList = xmlDoc.SelectSingleNode("bookstore").ChildNodes '获取bookstore节点的所有子节点 Dim xn As XmlNodeFor Each xn In nodeList '遍历所有子节点 Dim xe As XmlElement = CType(xn, XmlElement) '将子节点类型转换为XmlElement类型 If xe.GetAttribute("genre") = "李赞红" Then '如果genre属性值为“李赞红” xe.SetAttribute("genre", "update李赞红") '则修改该属性为“update李赞红” Dim nls As XmlNodeList = xe.ChildNodes '继续获取xe子节点的所有子节点 Dim xn1 As XmlNodeFor Each xn1 In nls '遍历 Dim xe2 As XmlElement = CType(xn1, XmlElement) '转换类型 If xe2.Name = "author" Then '如果找到 xe2.InnerText = "亚胜" '则修改 Exit ForEach '找到退出来就可以了 End IfNext xn1Exit ForEachEnd IfNext xn