XML VB.Net

Imports System
Imports System.IO
Imports System.Xml
public class Sample
  public shared sub Main()
      Dim doc as XmlDocument = new XmlDocument()
      doc.Load("booksort.xml")
      Dim nsmgr as XmlNamespaceManager = new XmlNamespaceManager(doc.NameTable)
      nsmgr.AddNamespace("bk", "urn:samples")
      Dim book as XmlNode 
      Dim root as XmlElement = doc.DocumentElement
      book = root.SelectSingleNode("descendant::book[@bk:ISBN='1-111111-57-6']", nsmgr)
      Console.WriteLine(book.OuterXml)
  end sub
end class