换行,预览当前行的[文书上传]中的word文档,但没有反应,是何原因?
CurrentChanged代码
If e.Table.Current IsNot Nothing AndAlso Forms("预览").Opened Then
Dim path As String = DataTables("数据表").DataCols("文书上传").DefaultFolder
If path = Nothing Then
path = ProjectPath & "attachments/"
End If
path = path & e.Table.Current("文书上传")
Dim web As WinForm.WebBrowser = Forms("预览").Controls("WebBrowser1")
web.address = path
End If