RosettaCodeData/Task/XML-XPath/Visual-Basic-.NET/xml-xpath.vb

9 lines
262 B
VB.net

Dim first_item = xml.XPathSelectElement("//item")
Console.WriteLine(first_item)
For Each price In xml.XPathSelectElements("//price")
Console.WriteLine(price.Value)
Next
Dim names = (From item In xml.XPathSelectElements("//name") Select item.Value).ToArray