XmlNode.InsertAfter inserts the specified node immediately after the specified reference node.
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("<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.InsertAfter(elem, root.FirstChild)
doc.Save(Console.Out)
End Sub 'Main
End Class 'Sample