以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WebBrowser 的 OfficeToolBar 属性有问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62189)
--  作者：zhsenchzhi
--  发布时间：2014/12/26 23:39:00
--  WebBrowser 的 OfficeToolBar 属性有问题
我使用了 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的菜单和工具栏 了，但是文件能够正确切换
--  作者：Bin
--  发布时间：2014/12/27 8:51:00
--  
切换好 再次设置 web.OfficeToolBar = True
试试 web.OfficeToolBar = false
web.OfficeToolBar = True