Mega Code Archive

 

Categories / VB.Net / XML LINQ

 

Add element to XDocument

Imports System Imports System.Reflection Imports System.Xml Module Module1     Sub Main()         Dim xdoc As XDocument = XDocument.Load("C:\hamlet.xml")         Dim xe As XElement = New XElement("PERSONA","new value")         xdoc.Element("PLAY").Element("PERSONAE").Add(xe)         Dim query = From people In xdoc.Descendants("PERSONA") Select people.Value         Console.WriteLine("{0} Players Found", query.Count())         For Each item In query             Console.WriteLine(item)         Next     End Sub End Module