VB.Net/XML LINQ/XNamespace

Import namespace

<source lang="vbnet"> Imports System Imports System.Xml.Linq Imports <xmlns:gfh="www.yourDomain.ru">

   Public Class MainClass
       Public Shared Sub Main()
           Dim employees As XElement = XElement.Load("EmployeesWithNS.xml")
           Dim gfhEmployees = From ele In employees.Descendants _
                              Order By ele.<Name>.Value() _
                              Where (ele.Name.Namespace = GetXmlNamespace(gfh)) _
                              Select ele.<Name>.Value()
           For Each emp In gfhEmployees
               Console.WriteLine(emp)
           Next
       End Sub
   End Class
  
   
 </source>

Using the Xml name space in the query

<source lang="vbnet"> Imports System Imports System.Reflection Imports System.Xml Module Module1

   Sub Main()
       Dim xml As XElement = XElement.Load("XLINQ.xml")
       Dim o As XNamespace = "urn:schemas-microsoft-com:office:office"
       Dim query = From w In xml.Descendants(o + "Author") _
           Select w
       For Each record In query
           Console.WriteLine("Author: {0}", record.Value)
       Next
   End Sub

End Module

 </source>