Option Strict
Option Explicit
Imports System
Imports System.IO
Imports System.Xml
Public Class Sample
Public Shared Sub Main()
Dim doc As New XmlDocument()
doc.LoadXml("" & _
"C# " & _
"")
Dim root As XmlNode = doc.FirstChild
'Create a new node.
Dim prefix As String = root.GetPrefixOfNamespace("urn:samples")
Dim elem As XmlElement = doc.CreateElement(prefix, "style", "urn:samples")
elem.InnerText = "hardcover"
root.AppendChild(elem)
doc.Save(Console.Out)
End Sub
End Class