第09章高级界面设计.pptVIP

第9章 高级界面设计 9.1 添加高级控件 9.2 图像列表控件 9.3 工具栏控件 9.4 状态栏控件 9.1 添加高级控件 右击工具箱面板，从弹出的菜单中选择【部件】菜单项，或单击【工程】菜单中的【部件】菜单项，此是时出现如图9-3的所示的【部件】对话框，用鼠标单击Microsoft Windows Common Controls 6.0左边的复选框，单击【确定】按钮，部件被添加到【工具箱】面板上，如图9-4所示，共有9个控件添加到【工具箱】中。用户可将新增的控件按钮拖至【高级控件】选项卡中。 9.2.2 ListImage对象的属性（一般了解）ListImage对象产生一个将成为ListImages集合部分的图像。其属性如表所示。 9.2.3 ListImages集合的属性和方法 Imagelist控件的ListImages属性是一个集合对象，它具有下面的属性： 9.3 工具栏控件 工具栏控件（Toolbar）用来在窗体上产生具有很多按钮对象的工具栏，按钮上可以显示文字、图形或两者兼有，可用该控件生成如Word那样的工具栏。 9.3.2 设置工具栏控件属性 向窗体添加工具栏控件，按下列步骤操作：l?? 设置属性值为1，即工具栏放在窗体的顶部。l?? 右击工具栏控件，从弹出的菜单中选择【属性】菜单项，再单击【图像列表】列表框右边的下拉箭头，从下拉的列表中选择ImageList1。这样ImageList1控件就和工具栏控件发生了联系。l?? 选中【按钮】选项卡，单击【插入按钮】后，【索引】文本框中出现数字1，其他输入框也变为可用。接着在【关键字】输入框输入“Key1”，【工具提示文本】输入框设为“浏览时间日期”，【图像】输入框设为1，即ImageList1控件的第一个图形作为按钮1的图形。重复上述步骤，添加四个按钮到工具栏上，并设置相应属性。l???? 设置完属性的用户界面。 9.3.3 工具栏中各按钮和代码相连 添加按钮之后，还要编写相应的代码按钮才能起作用。双击工具栏控件，激活代码窗口，在ToolBar1_ButtonClick事件过程中添加如下代码：Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.Index Case 1 …… Case 2 …… End SelectEnd Sub 9.4 状态栏控件 状态栏一般位于窗体的底部，用于显示系统的一些状态，如大小写情况、日期时间等，在状态栏中可以包含文字和图像。9.4.1 状态栏控件属性和事件 状态栏常用事件 状态栏常用事件主要有Click、DblClick、PanelClick、PanelDblClick。当单击状态栏上某一窗格时，执行PanelClick事件；当双击状态栏上某一窗格时，执行PanelDblClick事件。 9.5 通用对话框控件 1.标准控件 2.通用对话框控件-ActiveX控件 9.6 图形控件 1. 直接放置在窗口中 2. 放置在图片框中 9.6.3 图片框（PictureBox）控件 【例9.4】建立一个图片浏览框。 （1）启动VB，新建一个工程。 （2）在窗体上添加三个命令按钮控件，一个水平滚动条控件，一个垂直滚动条控件和二个图片框控件。 注意：图片框控件是一个容器类近期件 程序代码： ? Private Sub Form_Load() Picture1.AutoSize = False Picture2.Width = Picture1.Width Picture2.Height = Picture1.Height End Sub ? Private Sub Command1_Click() Picture2.Picture = LoadPicture(App.Path + \ + 002.jpg) HScroll1.LargeChange = HScroll1.Max / 10 HScroll1.SmallChange = HScroll1.Max / 100 VScroll1.LargeChange = VScroll1.Max / 10 VScroll1.SmallChange = VScroll1.Max / 100 End Sub ? Private Sub Command2_Click() Picture2.Picture = LoadPicture() Picture2.Width = Picture1.Width Picture2.Heigh