Transforms an XML document into an HTML document
Option Strict Option Explicit Imports System Imports System.IO Imports System.Xml Imports System.Xml.Xsl Imports System.Xml.XPath Public Class Sample Private Shared filename1 As String = "books.xml" Private Shared stylesheet1 As String = "output.xsl" Public Shared Sub Main() Dim xslt As New XslTransform() xslt.Load(stylesheet1) Dim doc As New XPathDocument(filename1) Dim writer As New XmlTextWriter(Console.Out) xslt.Transform(doc, Nothing, writer, Nothing) writer.Close() End Sub End Class