XML LINQ VB.Net

  1. Home
  2. VB.Net
  3. XML LINQ
  4. Add the new node to the bottom of the XML tree
Imports System
Imports System.Xml.Linq
    Public Class MainClass
        Public Shared Sub Main()
            Dim employees As XElement = XElement.Load("Employees.xml")
            Dim newEmployee = >
                                  First
                                  Coder
                                  07/15/2006
                                  9.95
                              
            employees.Add(newEmployee)
            For Each ele In employees.
                ele.Add()
                ele.Add(New XAttribute("Status", ""))
            Next
            Console.WriteLine(employees.ToString())
        End Sub
    End Class