Imports System
Imports System.IO
Imports System.Xml
public class Sample
public shared sub Main()
Dim doc as XmlDocument = new XmlDocument()
doc.LoadXml("" & _
"C# " & _
"")
Dim root as XmlElement = doc.DocumentElement
Dim elem as XmlElement = doc.CreateElement("price")
elem.InnerText="9.9"
Console.WriteLine(elem.OwnerDocument.OuterXml)
root.AppendChild(elem)
Console.WriteLine(doc.InnerXml)
end sub
end class