主题：[求助]WebBrowser 显示Word

Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim tm As String  = ProjectPath & "Attachments\出库单.doc"
Dim fl As String = ProjectPath & "Reports\出库单.doc"
Dim wrt As New WordReport(Tables("出库"),tm,fl)
wrt.Build()
wrt.Quit()
wbr.OfficeToolBar = True
wbr.AddRess = fl