代码如下 弹出的对话框显示文件位置是对应的
Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")Dim fl As String = ProjectPath & "Reports\计算机机房安全保密规定(暂行).doc"MessageBox.Show(fl)wbr.AddRess = fl