vb第六章2.docVIP

在工具栏中的每个Button对象还有Style属性，该属性决定了按钮的行为特点。在属性页的“样式”框中可以设定按钮的Style属性，表6-4列出了五种按钮样式以及它们的说明。 表6-4 按钮样式及其说明 按 钮 值 说 明 一般按钮 (tbrDefault) 0 该按钮类似于一般的Command按钮，这类按钮用鼠标操作时，单击后按钮恢复原态。例如常见的“新建”、“打开”按钮，都属于该样式的按钮。 开关按钮 (tbrCheck) 1 该类型的按钮被按下之后，并不弹起，保持按下的状态，若再被按一次，才恢复原态。例如常见的“加粗”、“倾斜”按钮，都属于该样式的按钮。 编组按钮 (tbrButtonGroup) 2 编组按钮用于实现按钮之间的分组，相邻的编组按钮都属于同一组。同组的按钮至多只允许一个按钮处于按下的状态，其功能与一组单选按钮完全相同。例如常见的“两端对齐”、“居中”、“右对齐”按钮就是编组按钮。 分隔按钮 (tbrSeparator) 3 分隔按钮在工具栏中并不显示，只留出8 个像素的空间，把它左右的按钮分隔开来。工具栏中的按钮本来是紧挨排列的，使用分隔按钮可以让同类或同组的按钮并列排放而与邻近的组分开。 占位按钮 (tbrPlaceholder) 4 占位按钮在工具栏中也不显示，它仅仅起到占位的作用。在占位按钮处可以安放其他控件（例如ComboBox 或ListBox 控件）。 菜单按钮 (tbrButtonDrop) 5 这类按钮由一个普通按钮和一个半宽的下三角按钮构成，当点击三角按钮时，便在其下面显示一个下拉菜单，用户可对此下拉菜单进行操作，完成其它任务或进行其它控制等。 ㈥ 为工具栏编写代码 当用户单击按钮（占位按钮和分隔按钮除外）时，就会触发ToolBar控件的ButtonClick事件。可以通过按钮的Index属性或Key属性来标识被单击的按钮。在以下代码示例中，用到了一个数据控件“data1”，数据控件及其有关内容将在后面的章节中讲述。ButtonClick事件的代码如下： Private Sub ToolBar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.Key Case Next data1.Recordset.MoveNext ‘记录指针指向下一个记录 Case Previous data1.Recordset.MovePrevious ‘记录指针指向前一个记录 Case Last data1.Recordset.MoveLast ‘记录指针指向最后一个记录 Case First data1.Recordset.MoveFirst ‘记录指针指向第一个记录 End Select End Sub 到此，我们已经建立了一个完整的工具栏。 ㈦ 工具栏程序设计中的基本技巧 控制工具栏的隐藏和重现 在一个应用系统中往往不可能只有一个工具栏，像Microsoft Word 2000文字处理系统，它就有十几个工具栏。但是，在应用中并没有把所有的工具栏都置于屏幕之上，以免破坏用户界面的整体均衡。因此，在应用程序中对工具栏的控制技术是很重要的。 当一个窗体带有多个工具栏时，应该把最常用且最重要的工具栏作为缺省情况与窗体一起显示，而其它的工具栏虽同窗体一起加载，但并不一起显示。 在技术上实现上述要求很简单，即在设计好工具栏后，把该窗体缺省的工具栏对应的ToolBar控件的Visible属性设置为True,而其他工具栏对应的ToolBar控件的Visible属性设置为False。这样，在窗体被加载并显示在屏幕上时，只有Visible属性等于True的ToolBar控件的工具栏显示的窗体内。 根据一般的经验，对工具栏的控制是在窗体的菜单上进行的。为此都为菜单设计有“工具栏”专用的菜单项，在“工具栏”菜单的下一级菜单中列出了系统所有的工具栏，选择其中任何一个工具栏都会立刻把它显示在窗体内，再次选择此工具栏的菜单项，相应的工具栏便又消失了。可见，有关工具栏的菜单项类似于一个开关性按钮。在子菜单后面的程序编码的关键语句为： ToolBar1.Visible=Not ToolBar1.visible 当工具栏正在被显示时，ToolBar控件的Visible属性等于True；若再次选择工具栏菜单项后，其ToolBar控件的Visible