Imports System
Imports System.Xml.Linq
Public Class MainClass
Public Shared Sub Main()
Dim employees As XElement = XElement.Load("Employees.xml")
Dim maxId As Integer = Aggregate ele In employees. Into Max(CInt(ele.@id))
Dim newEmployee = >
First
Coder
07/15/2006
9.95
employees.Add(newEmployee)
End Sub
End Class