330 likes | 538 Views
第七章 菜单、工具栏和状态栏. 7.1 Visual Basic 中的菜单 7.2 菜单编辑器 7.3 弹出式菜单 7.4 工具栏和状态栏 7.5 应用举例. 7.1 Visual Basic 中的菜单. 在 Visual Basic 中,菜单被称为控件对象,具有一组属性和事件,可以利用 “ 菜单编辑器 ” 创建、修改菜单,还可以通过程序代码在程序运行时动态地调整菜单选项。. 7.1 Visual Basic 中的菜单. 菜单的基本作用有两个 一是提供人机对话的界面,以便让使用者选择应用系统的各种功能。
E N D
第七章 菜单、工具栏和状态栏 • 7.1 Visual Basic中的菜单 • 7.2 菜单编辑器 • 7.3 弹出式菜单 • 7.4 工具栏和状态栏 • 7.5 应用举例
7.1 Visual Basic中的菜单 • 在Visual Basic中,菜单被称为控件对象,具有一组属性和事件,可以利用“菜单编辑器”创建、修改菜单,还可以通过程序代码在程序运行时动态地调整菜单选项。
7.1 Visual Basic中的菜单 • 菜单的基本作用有两个 • 一是提供人机对话的界面,以便让使用者选择应用系统的各种功能。 • 二是管理应用系统,控制各种功能模块的运行。 • 菜单可分为两种基本类型:弹出式菜单和下拉式菜单。
下拉式菜单 • 在用VB6.0设计下拉式菜单时,把每个菜单项(主菜单或子菜单项)看作是一个控件 • 与其他控件不同的是,菜单控件不在VB工具箱中,是用户通过“菜单编辑器”完成菜单设计的。
弹出式菜单 • 弹出式菜单是在窗口中单击鼠标右键,随即在鼠标箭头位置弹出相应的菜单(又称为快捷菜单),可以用鼠标点击相应的菜单项来执行操作。
7.2.1 用“菜单编辑器”编辑菜单 • Visual Basic中的下拉式菜单是通过“菜单编辑器”,即菜单设计窗口建立的。 • 菜单编辑器建立的下拉式菜单,最多可达6层。
进入“菜单编辑器” • ① 用鼠标单击菜单栏上 [工具]→[菜单编 辑器]菜单项。 • ② 在要建立菜单的窗体上单击鼠标右键, 在弹出的快捷菜单中单击[菜单编辑器] • ③ 单击工具栏中的[菜单编辑器]按钮。 • ④ 使用组合键Ctrl+E。
例7.1:设计一个具有个人爱好选择功能的菜单。操作者通过点击菜单项来选择自己的爱好,所选择的内容即可在文本框中显示出来。
7.2.2 设定菜单项 • 菜单项可以用一些属性来控制其某些具体的表现。 • 1、有效性控制菜单名.Enabled=False(或True)2、菜单项标记菜单名.Cheched=False(或True)3、键盘选择通过快捷键和访问键进行
7.2.3 修改菜单 • 菜单项的增减、菜单项上、下位置的调整、菜单项级别的升降等,有关这些修改都是通过利用“菜单编辑器”中对“数据区”中的各文本框、复选框以及利用“编辑区”中的7个命令按钮来实现的。
7.3 弹出式菜单 • 弹出式菜单是一种小型的菜单,用户可以在窗体的任意位置单击鼠标右键,它可以立即显示出来,当鼠标点击其中某个命令时,立即执行相应的功能。
建立弹出式菜单 • 第一步:使用“菜单编辑器”建立弹出式菜单,具体操作方法与下拉式菜单相同。惟一的区别是必须把菜单名(即主菜单项)的“可见”属性设置为False (注意:子菜单项不要设置为False)。
建立弹出式菜单 • 第二步:使用PopupMenu方法将已建立的菜单弹出显示。 • PopupMenu格式为: • 对象.PopupMenu 菜单名,Flags,X,Y,_ BoldCommand
PopupMenu方法 • “对象”是窗体名,即弹出式菜单所在窗体的窗体名称; • “菜单名”是在菜单编辑器中定义的主菜单项的名称; • “x”、“y”是弹出式菜单在窗体上的显示位置(与Flags参数配合使用); • “Bo1dCommand”用来在弹出式菜单中显示一个菜单控制。
“Flags”参数 指定菜单位置 定义菜单行为
弹出式菜单的“位置” • 弹出式菜单的“位置”由X、Y及Flags参数共同指定。 • 如果省略这几个参数,则鼠标光标所在位置为弹出式菜单左上角的坐标。 • 在缺省情况下,以窗体的左上角为坐标原点。 • 如果省略Flap参数,不省略X、Y参数,X、Y为弹出式菜单左上角的坐标;
弹出式菜单的“位置” • 如果同时使用X、Y及Flags参数,弹出式菜单的位置分为以下几种情况: • Flags=O;X、Y为弹出式菜单左上角的坐标 • Flags=4;X、Y为弹出式菜单顶边中间的坐标 • Flags=8;X、Y为弹出式菜单右上角的坐标
显示弹出式菜单 • 通常把PopupMenu方法放在MouseDown事件中。 • 一般通过单击鼠标右键显示弹出式菜单,这可以用Button变量实现。 • 左按钮的Button变量值为1,右按钮的Button变量值为2。
显示弹出式菜单例: Private Sub Form_MouseDown(Button _ As Integer, Shift As Integer, _ X As Single, Y As Single) If BOTTON = 2 Then PopupMenu AHXZ End If End Sub
弹出式菜单示例: • 例7.2: 将例7.1中的下拉式菜单转换成弹出式菜单,即当鼠标在窗体的任意位置单击右键,即弹出菜单,当点击菜单中命令时,内容即显示到文本框中。
7.4 工具栏和状态栏 • 在VB中包含了一个工具栏控件,使用它可以非常容易地创建工具栏。 • ActiveX控件并不在VB标准工具栏中,使用前需利用[工程]→[部件]命令,在打开的对话框中选择“Microsoft Windows Common Contrl 6.0”,然后单击确定,此时Toolbar(工具栏控件)即加到标准工具箱中。
将工具栏控件加到屏幕上 • 有两种方法: • 一是单击该按钮,然后在屏幕上绘画出 • 二是双击工具栏按钮,此时会在屏幕上自动出现工具条。
工具条属性设置 • 加到窗体中的工具条可通过Align属性进行设置
“属性页”对话框 • 将鼠标放在窗体的Toolbar控件上单击鼠标右键,在弹出的菜单中单击[属性]命令,即打开“属性页”对话框
例7.3:在窗体上建立一个工具栏,其中包括“字体”、“打开”、“退出”三个按钮对象,当用户单击某一工具按钮时,即执行相应的功能。
在工具按钮上载入图片 • 在Visual Basic中,用户也可以在所设计的工具按钮上添加图像。工具按钮不像其他控件那样本身就具有Picture属性,但可以通过专门的图像控件ImageList实现工具栏按钮图片的载入。ImageList控件不在标准工具箱中,用户可使用与加入Toolbar同样的方法将ImageList控件加入到标准工具箱。
7.4.2 使用状态栏控件 • 状态栏是由StatusBar控件生成,可以自动显示和更新某些类型的信息,通过设置它的Style属性可以显示各种信息
例7.5:设计一窗体,其底部有一状态栏,状态栏中包括两个窗格,第一个窗格显示系统的当前时间,第二个窗格显示用户从已制作的下拉式菜单中选择的菜单项。
7.5 应用举例 • 例7.6:建立下拉式菜单,其中包括[字体]、[大小]、[下划线]、[退出]等菜单项,当鼠标点击相应的菜单项时,窗体中文本框中的文字即变为相应的格式。 • 例7.7:将例7.5中的下拉式菜单转换成弹出式菜单,当鼠标点击菜单项时,同样能执行相应的功能。
7.5 应用举例 • 例7.8:创建一工具栏,其中包括“打开”、“保存”、“打印”三个命令按钮以及一个下拉列表框,其中包括若干种字体,当用户点击其中某种字体时,此字体即加载到文本框中的文本上。当用户点击某一命令按钮时,即执行相应的命令。同时在窗体底部的状态栏中显示出当前日期、当前时间、键盘字母大小写控制状况、插入/改写状态以及用户从下拉式列表框中所选的字体等信息。