学习XML（添加一个子节点） 摘录

这里介绍添加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子节点了