XML VB.Net

Imports System
Imports System.Xml
public class Sample
  public shared Sub Main()
        Using reader As XmlReader = XmlReader.Create("books.xml")
          reader.ReadToFollowing("book")
          Do
            Console.WriteLine("ISBN: {0}", reader.GetAttribute("ISBN"))
          Loop While reader.ReadToNextSibling("book")
        End Using
  End Sub
End class