Imports System
Imports System.Xml
Imports System.Xml.Schema
Class MainClass
Shared Sub Main()
Dim xmlTree As XElement = _
1
2
3
4
5
Dim child1 As XElement = xmlTree.(0)
child1.AddAfterSelf(New XElement("NewChild", 10))
Console.WriteLine(xmlTree)
End Sub
End Class