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.PreserveWhitespace = false
    doc.Load("book.xml")
    doc.PreserveWhitespace = true
    doc.Save(Console.Out)
  end sub
end class