VC++实现拨号上网程序

　　在Office2000中，就用户界面丰富程度而论，Word以56个工具栏（Toolbar）、50个弹出式菜单（Popup Menu）雄居首位，但Excel（工具栏40个、弹出式菜单51个）和PowerPoint（工具栏43个、弹出式菜单25个）也相差不远。大多数用户可能从来没有见过所有这些工具栏，甚至许多用户不知道Office提供了这么多命令工具。

　　虽然我们可以用【视图/工具栏】菜单隐藏或显示一些工具栏，但这个菜单并没有列出全部的工具栏。对于Word，从【工具/自定义】菜单可以看到的工具栏稍微多几个，但仍远远不到56个。在Excel和PowerPoint也类似。那么，这些丢失的工具栏到哪里去了呢？如何才能看到这些工具栏？如何将这些工具栏显示到菜单中？

　　一、工具栏背后的工具栏

　　Office工具栏上的相当一部分按钮是所谓的下拉式按钮。单击这些下拉按钮会显示出子菜单。其中一部分子菜单比较特殊，上面带有灰色的横条（Microsoft称之为″移动把手”）。例如Word【格式】工具栏的【字体颜色】按钮，单击它的小箭头并把鼠标移到移动把手上，灰条颜色变蓝并提示″拖动可使此菜单浮动”。按住移动把手可把菜单从工具栏拖下来，使之浮动，如图1所示。
　　一旦菜单拖下来成为浮动的工具栏，【视图/工具栏】菜单下会自动列出该工具栏；如果关闭该工具栏，则菜单下面的名字也不见了。因此，如果要再次显示这个工具栏，还是要重复原来的拖动过程。

　　二、用宏显示隐藏工具栏

　　大多数可以拖下来的菜单与画图或颜色功能相关，而且要从【绘图】工具栏访问。下表给出其中一部分工具栏的标题及其名字：

　　名字
　　标题
　　Fill Color
　　填充颜色
　　Line Color
　　线条颜色
　　Font Color
　　字体颜色
　　Shading Color
　　底纹色
　　Borders
　　边框

　　在宏中，可以通过名字访问这些菜单，或将这些菜单显示为浮动工具栏。例如，要显示【字体颜色】工具栏，可以用如下命令：

　　CommandBars(″Font Color″).Visible = True

　　再举一个例子。如果经常要为Word文档加上彩色标注，则最好能快速访问【字体颜色】、【线条颜色】、【填充颜色】和【标注】四个工具栏。可以写一个子过程：

　　Sub ShowCalloutToolbars(OnOrOff As Boolean)
　　CommandBars(″Callouts″).Visible = OnOrOff
　　CommandBars(″Font Color″).Visible = OnOrOff
　　CommandBars(″Line Color″).Visible = OnOrOff
　　CommandBars(″Fill Color″).Visible = OnOrOff
　　End Sub

　　然后用如下两个命令分别显示和隐藏上述四个工具栏：

　　ShowCalloutToolbars True
　　ShowCalloutToolbars False

　　当然，用宏来显示或关闭某些隐藏工具栏，在许多其他情形下也是很有帮助的，这些应用场合就有待读者自己去发现了。