Mega Code Archive

 

Categories / VB.Net / XML

 

Adds node to the end of the list of child nodes

Option Explicit Option Strict Imports System Imports System.IO Imports System.Xml Public Class Sample     Public Shared Sub Main()         Dim doc As New XmlDocument()         doc.LoadXml("<book genre='Computer' ISBN='1-111111-57-5'>" & _                     "<title>C#</title>" & _                     "</book>")         Dim root As XmlNode = doc.DocumentElement         Dim elem As XmlElement = doc.CreateElement("price")         elem.InnerText = "9.9"         root.AppendChild(elem)         doc.Save(Console.Out)     End Sub  End Class