display html on vb6 form

1.add Microsoft Internet controls to link reference.
2.Place control on form, I used 'Browser' as control name.
use this function to display :

Private Sub ShowHtml(s As String)
    Browser.Navigate ("about:blank")
   ' Dim doc  As IHTMLDocument2
    Set boxDoc = Browser.Document
    boxDoc.Write (s)
    boxDoc.Close
End Sub

more...