安装ActiveBar 控件，启动VB建立一个新的工程文件。选择工程／部件／控件／ActiveBar Control ，调出工具箱窗口，在窗口的最下方便可以看到ActiveBar 控件。点击此控件，在窗体中画出它，大小位置随意。在窗体中的控件上右击鼠标，选择Designer 选项，弹出控件设计程序。点取Tools 窗口中的按钮，在弹出的Manage Categories 对话框中增加两个新的Category 分别为File 和Main。在Tools 窗口中选择File ，点取Insert／Tools ，在弹出的对话框中输入Caption