怎样在VB的应用程序中嵌入Word，并且对它进行控制？

Question

怎样在VB的应用程序中嵌入Word，并且可以对菜单，工具栏进行控制，包括（可见不可见，菜单，工具栏中的某一项的屏蔽，新增等）

Answer 1

有一個從CSDN文章上看來的可供你參考<<在WORD中嵌入工具條>>Dim wordApp As New Word.Application
    Dim myDoc As Word.Document
    
    isExist = False
    For Each myBar In wordApp.CommandBars
            If myBar.Name = "文件操作" Then
                isExist = True
            End If
    Next
    wordApp.Visible = True
    If isExist = False Then
            Set myBar = wordApp.CommandBars.Add( _
                        Name:="文件操作", _
                        Position:=msoBarTop, _
                        Temporary:=False)
           
            Set myButton = CommandBars("文件操作").Controls.Add
                With myButton
                    .Caption = "文件保"
                    '.Style = Office.msoButtonIcon
                    .ToolTipText = "aaaaaaaaaa"
                    .Visible = True
                    .OnAction = "bbbbbbbb"
                End With
            myBar.Visible = True
    End If

Answer 2

谢谢楼上的，可能我说的不是很清楚。我要的是在程序中的控件中嵌入word
比如说在包容器中嵌入Word，并且对他的菜单，工具栏进行控制。
您上面的代码，我也试过，但是是针对弹出的Word。（我要的是Word直接显示在窗体中，不另外弹出）
您的这种方法在包容器中就没法用。。

Answer 3

http://www.popsoft.com.cn/learn/sys/vb7.htm

Answer 4

在包容器中嵌入Word对象
在VB中，要访问在包容器中嵌入的Word对象，首先要在项目中插入对象。做法如下：在窗体中插入OLE控件，对象类型选择“MicrosoftWord图片”或“Microsoft Word文档”，再按“确定”。
然后用Object属性访问文档或图片，并使用WordBasic语句和函数作用于它。嵌入的对象必须在可被访问之前被激活，可以使用Action属性激活OLE控件。例如，使用下面指令访问一个嵌入在称为OLE1的OLE控件中的文档：
Dim Wordobj as Object
OLE1.Action =7
Set Wordobj =OLE1.Object.Application. WordBasic
其他方面，使用方法同OLE自动化。使用在包容器中嵌入的Word对象，Word显示的窗口大小、位置与OLE控件定义的大小、位置相同，而且工具栏显示位置与Word脱离。这一点与OLE自动化相比，是个不足。
总之，要想在Microsoft Visual Basic中控制Microsoft Word，最好使用OLE自动化，通过使用WordBasic指令对Word进行全面控制，而且，用户使用起来与使用Microsoft Word一样，非常方便。
用这个方法,菜单没办法控制不显示,工具栏也显示不出来......................

Answer 5

用过微软的DSOFramer吗?
基本上可以满足你的要求,操作简单
可以生成新文件,加载文件,控制工具条显示隐藏
同样支持WEB方式操作Word文件
但是因为用的人不是很多,相关文章比较少
部分功能需要自己去发掘

Answer 6

我觉得用webbrowse比较好，其他的方法似乎好多问题，当然，webbrowse也有很多问题。

Answer 7

昨天刚找到了微软的DSOFramer，正在摸索中，可惜对VC一知半解，看代码比较困难点~~~

Answer 8

C++的东西根本不用去碰阿安装后，在工程里加上控件，然后把控件拖到Form上
在程序里看这个控件的属性和方法事件之类的提示
都是标准单词，很容易理解的一些基本的用法就看那个Web网页的代码，因为用的是Vbscript，有相同的地方
有问题发邮件问我吧
[email protected]不过回得可能不会太及时，只能保证24小时内响应 
^_^