各位看官，一个简单的变量声明问题。进来看看吧。

Question

因为在VB中要控制一下WORD。
所以我要在WORD里面加一个工具栏并为其添加上一页和下一页的二个按钮。
在MSDN的网站上找了相关资料。可是从它上面拿到VB里。有几个变量类型VB不认。
怎么办啊？急的要吐血了。
这几个变量类型如下：Dim cbrBar  As commandbar
Dim ctlCBarControl    As CommandBarControl这里面的commandbar和CommandBarControl在变量声明的时候就是没有啊？
谢谢各为，做WORD还是头一次啊。

Answer 1

在VB6的IDE里选菜单项"工程"->"引用", 在弹出的"工程引用对话框"中添加"Microsoft Office x.x Object Library"，其中x视你机子上装的Office的版本而定.

Answer 2

楼主，CommandBars不能那样用的，请看下边写的示例。
注意：1.本程序多次执行，工具栏会出现混乱现象，你试了就知道了。
      2.引用Microsoft Office 9.0 Object Library、Microsoft Word 9.0 Object Library
 
Private Sub Command1_Click()
    On Error Resume Next
    Dim WordApp  As New Word.Application
    WordApp.Visible = True
    WordApp.CommandBars.Add(Name:="VBDN自定义工具栏").Visible = True    '添加自定义工具栏
    WordApp.CommandBars("VBDN自定义工具栏").Controls.Add msoControlButton, 2267, 1  '下一页按钮
    WordApp.CommandBars("VBDN自定义工具栏").Controls.Add msoControlButton, 2266, 1  '上一页按钮
    WordApp.Documents.Add                                               '建立新文档
    WordApp.Selection.InsertBreak Type:=wdPageBreak                     '插入分页符
    WordApp.Selection.InsertBreak Type:=wdPageBreak                     '插入分页符
End Sub

Answer 3

谢谢二位啊。这就结贴了。
尤其是感谢 VBDN(凡事预则立，不预则废) 啊。3点多还给俺回贴解决问题。谢谢！！！！！！！！！