http://blog.csdn.net/xiaolinyouni/article/details/7209444
已知有一个XML文件(bookstore.xml)如下:
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
<book genre="fantasy" ISBN="2-3631-4">
<title>Oberon's Legacy</title>
<author>Corets, Eva</author>
<price>5.95</price>
</book>
</bookstore>
往<bookstore>节点中插入一个<book>节点:
Dim xmlDoc As New XmlDocument()
xmlDoc.Load("bookstore.xml")
Dim root As XmlNode = xmlDoc.SelectSingleNode("bookstore") '查找<bookstore>
Dim xe1 As XmlElement = xmlDoc.CreateElement("book") '创建一个<book>节点
xe1.SetAttribute("genre", "李赞红") '设置该节点genre属性
xe1.SetAttribute("ISBN", "2-3631-4") '设置该节点ISBN属性
Dim xesub1 As XmlElement = xmlDoc.CreateElement("title")
xesub1.InnerText = "CS从入门到精通" '设置文本节点
xe1.AppendChild(xesub1) '添加到<book>节点中
Dim xesub2 As XmlElement = xmlDoc.CreateElement("author")
xesub2.InnerText = "候捷"
xe1.AppendChild(xesub2)
Dim xesub3 As XmlElement = xmlDoc.CreateElement("price")
xesub3.InnerText = "58.3"
xe1.AppendChild(xesub3)
root.AppendChild(xe1) '添加到<bookstore>节点中
xmlDoc.Save("bookstore.xml")
结果为:
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
<book genre="fantasy" ISBN="2-3631-4">
<title>Oberon's Legacy</title>
<author>Corets, Eva</author>
<price>5.95</price>
</book>
<book genre="李赞红" ISBN="2-3631-4">
<title>CS从入门到精通</title>
<author>候捷</author>
<price>58.3</price>
</book>
</bookstore>
修改节点:将genre属性值为“李赞红“的节点的genre值改为“update李赞红”,将该节点的子节点<author>的文本修改为“亚胜”。
Dim nodeList As XmlNodeList = xmlDoc.SelectSingleNode("bookstore").ChildNodes '获取bookstore节点的所有子节点
Dim xn As XmlNode
For 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 XmlNode
For Each xn1 In nls '遍历
Dim xe2 As XmlElement = CType(xn1, XmlElement) '转换类型
If xe2.Name = "author" Then '如果找到
xe2.InnerText = "亚胜" '则修改
Exit ForEach '找到退出来就可以了
End If
Next xn1
Exit ForEach
End If
Next xn
显示所有数据。
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
分享到:
相关推荐
VB6和VB.NET中的XML的读写操作.doc 。介绍了vb6和vb.net怎么读写xml格式的文件。
通过vb.net对xml文件进行创建、插入、修改和删除操作,代码简洁,针对性强。
VB.net读取XML标签值,两种方法,一是加载XML字符串,一是加载XML文件,然后再从节点路径中读TAG第一个匹配值
vb.net操作XML文件,读取编辑删除添加XML文件操作
在VB.net环境下实现如何读取一个xml文件的例程。
收集的一个VB.NET 读取写入XML文件的类,做了一些修改,希望能对大家有所帮助!
VB.net读写XML文件源代码,此项目源代为DLL形式,在调用时需注意函数接口
VB.NET XML文件的读取,把XML读入DataGrid中,并把数据写入XML文件中
VB。NET2005 实现程序创建XML文档
VB.Net读取ini文件的例子,和读取xml文件的例子。两种方法的比较。建议还是用Xml比较好。System.Xml
主要是今天又有网友问类似的xml文件读取问题。 找不到源代码和xml文件和读取后的界面。重新写一个,于是上传到这里来了。主要看form2.vb。 或者查看:http://blog.csdn.net/linjimu/archive/2009/08/19/4463713.aspx
Office XP 以及 VS.NET,这个编辑器 可以支持书写 C#、ASP.NET、ADO.NET、XML、HTML 等多种代码, 支持基 于项目或者是文件的开发,可以对 C#、HTML、ASP、ASP.NET、VB.NET、V Bscript、XML 提供彩色语法...
此为一个VB.NET环境的XML文件操作示例,演示了两个基本的XML操作功能,读取和写入,在读取后,并对XML数据进行格式化处理,并将其显示在DataGridView控件中。同时还配合数据库,实现了XML数据对数据库数据的对应操作...
VB.NET XML和JSON序列化与反序列化,根据实体类可以快速解析XML和json文件,和生成xml,json文件
VB.net 开发的一款 XML文件编辑器 .net1.0 框架的
VB读取XML文件的操作实例,演示读取XML各个定义键的值。程序是一个专一读取XML文件的VB类,并没有使用微软的XML.DLL。因此比较有参考价值,很不错。
vb.net写的webservice接口,对端发送string形式的XML文件后,本程序进行相应的数据提取存储到数据库后,返回一个XML
NeMoReadIniFileVB.Net程序设计:读取ini文件和读取xml文件的例子,程序首先演示了如何读取ini文件到ComboBox中,然后演示读取XmL文件到ComboBox中,VS.net内置对xml的操作可以参考: System.Xml 和 System.Xml.Xml...
vs2005 vb.net 内有说明文件 XML处理
支持最新的Visual Studio功能 - 支持最新的VB.Net / C#功能,包括Await / Async,隐式行继续,多行Lambdas,Nullable可选参数,LINQ,XML,WPF,Lambda表达式和扩展方法。在转化过程中,保留了原有的注释和变量名。...