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 doc2 As New XmlDocument()
doc2.Load("books.xml")
Dim newBook As XmlNode = doc.ImportNode(doc2.DocumentElement.LastChild, True)
doc.DocumentElement.AppendChild(newBook)
doc.Save(Console.Out)
End Sub 'Main
End Class 'Sample