讀取mht檔

code:
Imports System.Text.Encoding
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim streamReader As New IO.StreamReader("C:\22.mht")
Dim str As String = streamReader.ReadToEnd()
Me.WebBrowser1.DocumentText = str
End Sub
End Class