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

    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