学习XML（删除一个子节点）

      删除一个xml文件的子节点与前一章修改xml文件的子节点类似，都需要获取根节点的所有子节点。

       方法如下：

        1.定义读取xml文件的变量：

            Dim xmlDoc as New XmlDocument

             xmlDoc.Load("bookstore.xml")

        2.定义一个变量，获取根结点的所有子节点

             Dim xNodeList as XmlNodeList =xmlDoc.selectSingleNode("bookstore").ChildNodes

         3.做for循环，找到需要删除的子节点。这里删除genre属性为fantasy的genre属性，同时删除genre属性为update comedy的所有子节点

          Dim xmlNode as XmlNode

          For  Each xmlNode In xNodeList

                    Dim xElement as xmlElement =CType(xmlNode,XmlElement)

                     If (xElement.GetAttribute("genre")="fantasy") Then          //寻找genre=fantasy的节点

                            xElement.RemoveAttribute("genre")                 //删除genre属性

                     ElseIf    xElement.GetAttribute("genre") ="update comedy" Then      //寻找genre =update comedy的节点

                            xElement.RemoveAll()                  //删除该节点所有属性

                   End If

              Next

          4.保存所作的变换

              xmlDoc.Save("bookstore.xml")