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("" & _
"" & _
"C# " & _
"" & _
" ")
Dim reader As New XmlTextReader("cd.xml")
reader.MoveToContent() 'Move to the cd element node.
Dim cd As XmlNode = doc.ReadNode(reader)
doc.DocumentElement.AppendChild(cd)
doc.Save(Console.Out)
End Sub
End Class