Mega Code Archive
Loop through a node in Xml document
Module Program
Sub Main()
Dim doc As XElement = XElement.Load("Inventory.xml")
Dim petNames = From pn In doc... Select pn.Value
For Each name In petNames
Console.WriteLine("Name: {0}", name)
Next
End Sub
End Module