我使用了 WebBrowser 打开excel文件,并且 OfficeToolBar = True,为什么只有第一次打开excel 时 能显示Excel的菜单和工具栏,切换文件后就不显示Excel的菜单和工具栏了呢?
代码如下:
If e.Col.Name = "文件" Then
Dim fileDesc As String = e.Row("描述")
Dim fileFullDir As String = e.Row("文件完整路径")
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.OfficeToolBar = True
If fileDesc = "文件" Then
web.OfficeToolBar = True
web.Address = fileFullDir
'Else
'web.Address = Nothing
End If
End If
这个代码是 加给一个table的 click事件的, webbrowser能够正确切换文件,说明该段代码已经被执行,可是就是 Excel的菜单和工具栏 显示有问题,只能显示一次,只有切换文件,就不显示Excel的菜单和工具栏 了,但是文件能够正确切换