Mega Code Archive

 
Categories / VB.Net / XML LINQ
 

Select nodes from Descendants

Imports System Imports System.Data.DLinq Imports System.Expressions Imports System.Query Imports System.Reflection Imports System.Xml Module Module1     Sub Main()         Dim xdoc As XDocument = XDocument.Load("data.xml")         Dim query = From people In xdoc.Descendants("PERSON") Select people.Value         Console.WriteLine("{0} Players Found", query.Count())         For Each item In query             Console.WriteLine(item)         Next     End Sub End Module