这里介绍添加XML节点的方法。
首先定义XML文件：(bookstore.xml)
<?xml version="1.0" encoding="utf-8"?>
<bookstore>
<book genre="fantasy" ISBN="2-9088-1">
<title>Oberon's Legacy</title>
<author>Corets,Eva</author>
<price>20.8</price>
</book>
</bookstore>
OK，这就是有一个简单节点的xml文件，它有一个根节点bookstore，其子节点为book，其中book有两个属性genre 和ISBN，每个book节点又三个子节点title,author 和price。
下面给这个xml文件添加一个book子节点：
1.引用XML名称空间： Imports System.xml
2.定义一个读取xml文件的方法，暂且这么说吧:
Dim xmlDoc as New xmlDocument
xmlDoc.Load("bookstore.xml")
3.定义根结点，并找到根据节点名字找到根结点
Dim root as XmlNode =xmlDoc.SelectSingleNode("bookstore")
4.定义一级子节点，注意根结点与子节点的定义方式不同
Dim xelement as XmlElement =xmlDoc.CreateElement("book")
xelement.SetAttribute("genre","comedy") //给一级子节点添加两个属性
xelement.SetAttribute("ISBN","2-0875-3")
5.定义二级子节点。节点的定义方式都是相同的，只是赋值的方式有所差别。这里需要定义三个二阶子节点
Dim xesub1 as XmlElement =xmlDoc.CreateElement("title")
xesub1.InnerText ="c#" //给二级子节点赋值
xelement.AppendChild(xesub1) //将这个二阶子节点添加给一级子节点
Dim xesub2 as XmlElement =xmlDoc.CreateElement("author")
xesub2.InnerText ="rubby"
xelement.AppendChild(xesub2)
Dim xesub3 as XmlElement =xmlDoc.CreateElement("price")
xesub3.InnerText ="20.8"
xelement.AppendChild(xesub3)
6.将子节点添加到根节点中去，并保存该xml文件
root.AppendChild(xelement)
xmlDoc.Save("bookstore.xml")
好了，我们再打开xml文件就会发现，已经新添加了一个book子节点了