用AxWebBrowser显示word如何才能显示指定工具栏啊

用AxWebBrowser显示word怎么才能显示指定工具栏啊
代码如下

VB.NET code

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load        AxWebBrowser1.Navigate("C:\1.doc")    End Sub    Private Sub AxWebBrowser1_NavigateComplete2(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event) Handles AxWebBrowser1.NavigateComplete2        'e.pDisp.Application.CommandBars("Standard").Visible = True        'e.pDisp.Application.CommandBars("Reviewing").Visible = False        AxWebBrowser1.ExecWB(SHDocVw.OLECMDID.OLECMDID_HIDETOOLBARS, SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER)    End Sub

总是显示"Reviewing"工具栏,手动显示Standard工具栏才行.
用这两句
'e.pDisp.Application.CommandBars("Standard").Visible = True
'e.pDisp.Application.CommandBars("Reviewing").Visible = False
也不行啊

有高手知道吗


[解决办法]
恩，dsoframe还是不错的。不过多文档打开时貌似有点问题

查看更多 下一篇