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