Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Prepare StringWriter for results
Dim sw As System.IO.StringWriter = New System.IO.StringWriter()
'Load xml file into XMLDoc
Dim XMLDoc As XPathDocument = New XPathDocument("C:\Redix\HGApps\WindowsApplication3\WindowsApplication3\XMLFile1.xml")
'Load XSL
Dim XSLTDoc As XslTransform = New XslTransform()
XSLTDoc.Load("C:\Redix\HGApps\WindowsApplication3\WindowsApplication3\XSLTFile1.xsl")
'Transform XMLDoc and dump HTML results to stringwriter -> sw
XSLTDoc.Transform(XMLDoc, Nothing, sw)
'Pull results out of stringwriter and populate literal
TextBox1.Text = sw.ToString()
End Sub