MS Rename taskFlow
This commit is contained in:
9
app/TaskFlow/frmPreviewHtml.vb
Normal file
9
app/TaskFlow/frmPreviewHtml.vb
Normal file
@@ -0,0 +1,9 @@
|
||||
Public Class frmPreviewHtml
|
||||
Public DisplayText As String
|
||||
|
||||
Private Sub frmPreviewHtml_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
WebBrowser1.Refresh()
|
||||
Dim otext = "<html><head></head><body>" + DisplayText + "</body></html>"
|
||||
WebBrowser1.DocumentText = otext
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user