Mega Code Archive
XContainer Add adds the specified content as children of this XContainer
<![CDATA[
Imports System
Imports System.Xml
Imports System.Xml.XPath
Public Class MainClass
Public Shared Sub Main()
Dim srcTree As XElement = _
<Root>
<Element1>1</Element1>
<Element2>2</Element2>
<Element3>3</Element3>
<Element4>4</Element4>
<Element5>5</Element5>
</Root>
Dim xmlTree As XElement = _
<Root>
<Child1>1</Child1>
<Child2>2</Child2>
<Child3>3</Child3>
<Child4>4</Child4>
<Child5>5</Child5>
</Root>
xmlTree.Add(New XElement("NewChild", "new content"))
xmlTree.Add( _
From el In srcTree.Elements() _
Where CInt(el) > 3 _
Select el _
)
xmlTree.Add(srcTree.<Child9>)
Console.WriteLine(xmlTree)
End Sub
End Class
]]>