vb菜单与工具栏设计.ppt

1、第四章菜单和工具栏设计，主要内容是：1。菜单设计，2。弹出式菜单设计，3。工具栏设计，4。状态栏设计，2，4.1菜单设计。在Windows中，菜单可以分为两种基本类型：下拉菜单和弹出菜单。下拉菜单通常通过单击菜单栏中的菜单名称来打开，而弹出菜单通常通过在特定区域中右键单击来打开。如图4-1所示，它们是VB“项目”菜单的下拉菜单和表单的弹出菜单。3，4.1.1任务菜单控件，在Visual Basic中，菜单也是一个图形对象，即控件。像其他控件一样，菜单需要定义它们的外观和属性。在设计和运行菜单时，可以设置标题属性、启用属性、可见属性、选中属性和其他属性。每个菜单项都可以接收单击事件，当用鼠标或键

2、盘选择菜单项时，将调用该事件。4，4.1.2任务2菜单编辑器，在Visual Basic中，使用菜单编辑器设计菜单和菜单项，或向现有菜单添加新菜单项，编辑现有菜单选项，以及修改和删除现有菜单和菜单项。有几种方式进入菜单编辑器：l选择工具和菜单编辑器命令；l单击标准工具栏中的“菜单编辑器”按钮；按住Ctrl键；右键单击要创建菜单的表单(该表单是活动表单)，并从弹出的快捷菜单中选择“菜单编辑器”命令。弹出菜单编辑器对话框，如图4-2所示。图4-2，A，5，菜单编辑器对话框，A，6，菜单编辑器窗口分为三部分：数据区、编辑区和菜单项显示区。分别介绍了各部分的功能。1数据区数据区是菜单控件的属性区，用于

3、输入和修改菜单项以及设置菜单项的属性。它由10个部分组成，每个部分的功能如下。(1)标题：此文本框用于输入已建立菜单的标题和菜单中每个菜单项的标题(相当于菜单控件的标题属性)，它也是菜单中显示的字符，可以在标题中设置热键。如果您想在菜单中添加分隔线，请在此处输入减号(-)。A，7，(2)名称：此文本框用于输入已建立的菜单和菜单中未显示的每个菜单项的控件名称(即菜单控件的名称属性)。在Visual Basic中，菜单和每个菜单项都是控件，因此它们必须有一个控件名(它的Name属性)。(3)索引：此文本框用于设置用户创建的控件数组的下标，相当于控件数组的索引属性。(4)快捷键：该下拉列表框用于设置

4、相当于菜单项的快捷键。当程序运行时，按下快捷键将立即运行一个菜单项。快捷键的分配包括功能键和控制键的组合，它们出现在菜单中相应菜单项的右侧。A，8，(5)帮助上下文：此文本框用于输入在帮助文件(由帮助文件属性设置)中查找相应帮助主题的数值。(6)协调位置：此下拉列表框用于确定相应菜单或菜单项的显示位置。下拉列表框中有四个选项，它们的功能如下：l0-无菜单项不显示；左侧菜单项显示在左侧；L2-中间菜单项显示在中间；菜单项13-右侧显示在右侧。A，9，(7)检查：此复选框用于设置菜单项标志(即菜单项的“已检查”属性)。该选项通常是动态添加或取消的，通常应根据执行情况在程序代码中设置。当“检查”属性

5、设置为“真”时，可以在相应的菜单项旁边放置一个标记，以指示该菜单项当前处于活动状态。(8)有效：该复选框用于设置菜单项的操作状态(即启用属性)。默认情况下，此属性为“真”，这意味着此选项有效，可以响应用户事件。如果此选项设置为False，则相应的菜单项不会响应用户事件。A，10，(9)可见：此复选框用于确定相应的菜单项是否可见(即可见属性)。如果菜单项可以执行，其可见属性为真；否则，无法执行相应的菜单项，也就是说，其可见属性为False。此时，其“可见”属性可以设置为“真”，菜单项将重新出现在菜单中。(10)显示窗口列表：当选中此复选框(即在框中)时，将显示一系列当前打开的子窗口。此选项用于多

6、文档应用程序。编辑区编辑区有7个按钮，用于简单编辑输入菜单项。菜单在数据区输入，并显示在菜单项显示区。这七个按钮的功能如下：(1)左右箭头：用于生成和取消缩进符号。单击右箭头一次以生成缩进符号(四个点“.”)，可以使当前菜单项的级别下降一级；单击左箭头一次，可以删除缩进符号，其功能是将当前菜单项的级别提高一级。A，12，(2)上下箭头：用于移动菜单项在菜单项显示区域中的位置。将条形光标移动到菜单项，单击向上箭头将其向上移动，然后单击向下箭头将其向下移动。(3)下一步：创建一个新的菜单项(与按下回车的效果相同)。(4)插入：在当前菜单项之前插入一个新的菜单项。(5)删除：删除当前菜单项。A，13

7、，3菜单项显示区域菜单项显示区域位于菜单设计窗口下方，输入菜单项显示在该区域，不同菜单项的级别由缩进符号表示。条形光标所在的菜单项是“当前菜单项”。任务3:创建菜单的步骤。示例4-1设计一个具有输入、输出和显示功能的菜单，该菜单可以显示一串输入字符。分析：根据问题的含义，可以分为两个主菜单项，即“输入信息”和“显示信息”，每个主菜单项包括两个子菜单项。l“输入信息”包括“输入”和“退出”。l“显示信息”包括“显示”和“清除”。建立菜单的具体操作步骤如下：(1)建立控件在这种情况下，需要输入和输出数据，因此需要建立一个用于输入数据的文本框、一个用于输出数据的标签和两个作为提示的标签。每个控件的属

8、性设置如表4-1所示，表单界面如图4-3所示。另外，设置标签输出的背景颜色以及标签1和标签2的显示模式，如图4-4所示。图4-3，A，16，菜单控制设计，图4-4，A，17，菜单项设计，A，18，(2)在设计菜单下，使用菜单编辑器设计每个菜单项。设计菜单控件时，应提供三个属性：标题、名称和缩进符号，一个缩进符号代表一层子菜单，没有缩进符号代表主菜单项。在这个例子中，有两个主菜单项，每个主菜单项有两个子菜单。属性设置如表4-2所示。具体操作步骤如下：选择工具菜单编辑器，弹出菜单编辑器对话框。在“标题”文本框中输入“输入信息”(主菜单1)，相同的标题名称出现在菜单项显示区域。A，19，按Tab键(

9、或使用鼠标)将输入光标移动到名称文本框。在“名称”文本框中输入“输入”，菜单项显示区域没有变化。将此菜单项的“启用”和“可见”属性设置为“真”(本例中所有菜单项都是如此)。点击编辑区的“下一步”按钮，菜单项显示区的条形光标下移，数据区的“标题”文本框和“名称”文本框清空，光标返回“标题”文本框。在“标题”文本框中输入“输入”，信息同时显示在菜单项显示区。A，20，单击编辑区域中的右箭头，菜单显示区域中的“输入”向右移动，并出现一个缩进符号(。)出现在左侧，表示“输入”是“输入信息”的下一级菜单。点击“快捷键”下拉列表框右端的下拉按钮，选择Ctrl I作为“输入”菜单项的快捷键。此时，Ctrl

10、1出现在菜单项的右侧。点击编辑区的“下一步”按钮，菜单项显示区的条形光标将下移，缩进符号“.”会自动出现在左端。在标题文本框中输入退出，然后在名称文本框中输入退出作为菜单项的名称。点击“快捷键”下拉列表框右端的下拉按钮，选择Ctrl+Q作为“退出”菜单项的快捷键。A，21，建立主菜单项“显示信息”及其两个子菜单项的操作类似于上述步骤，将不再重复。设计的窗口如图4-4所示。此时，点击右上角的“确定”按钮，菜单的建立结束。设计完成后，表单的顶行显示主菜单项，点击主菜单项显示下拉菜单，如图4-5所示。如前所述，每个菜单项(包括主菜单项和子菜单项)都可以接收点击事件。每个子菜单项对应一个点击事件过程。

11、也就是说，在程序运行后，您可以通过单击子菜单项来执行由事件进程定义的操作。每个菜单项对应一个控件。菜单设计完成后，图4-5所示的菜单项显示在表单上。此时，只需单击一个子菜单项即可编写该菜单项。例如，完成菜单设计后，单击“输入信息”菜单项，显示“输入”和“退出”子菜单项。如果您点击“输入”子菜单项，您将进入程序代码窗口并显示：一，23，私有子输出_点击()输入菜单代码文本1。文本=结束子。显示菜单代码输出。caption=text1.text end sub，a，24，private subcolear _ click()清除菜单代码text1.text=output。标题=结束子，a，25，4

12、.1.4任务4菜单控制数组。在Visual Basic中，菜单也是一个图形对象，即一个控件，因此可以使用数组的概念。菜单控件数组的功能主要有以下两个方面：(1)用于动态添加和删除菜单项；(2)简化编程过程，用一段代码处理多个菜单项。示例4-2设计一个简单的文本编辑器，具有创建、编辑和保存一般文本文件的功能，如图4-7所示。A，26，图4-7简单文本编辑器，A，27，建立该菜单的具体操作步骤如下：(1)建立菜单控件。因为在这个菜单中有文本输入和显示操作以及文件操作(例如“打开”和“保存”)，所以需要文本框和对话框，并且还应该设置文本的多行属性和滚动条，如图4-8所示。(2)设计菜单该文本编辑器中

13、每个菜单的下拉菜单中的菜单项都是通过菜单控件数组完成的，只需指定其索引属性值即可。打开菜单编辑器，输入每个菜单项的属性，如表4-3所示。建立的菜单如图4-9所示。图4-8，A，28构建菜单控件，图4-9，A构建带有菜单控件数组的菜单，A，30，(3)编写事件过程代码在菜单构建后，有必要为每个事件过程编写相应的代码。以下是每个菜单项的代码。，对应于“文件”菜单中每个菜单项的事件代码如下：private subfile _ click(索引为整数)n=index select case n case 0 create Text 1。Text=Form1。标题=未命名，A，31，案例1打开子菜单“公

14、共对话1”。显示打开显示打开对话框fname=公共对话1。如果fname则为text1，则为filename。text=打开输入名称#1 b=do，直到eof (1)行输入# 1，下一行b=b下一行Chr(13) Chr(10)循环关闭# 1文本1。文本=b结束如果表格1。标题=f名称，A，32，案例2保存子菜单如果表单1。标题=未命名或格式1。caption=then commondialog1。showsave显示“另存为”对话框fname=commondialog1。filename else fname=form1。标题结束，如果是fname，则打开fname，输出为#1打印#1，文本

15、1。文本关闭#1结束如果，A，33，将案例3另存为子菜单公共对话1。显示另存为对话框fname=commondialog1。如果是fname，则打开fname作为# 1打印# 1输出。文本1。文本关闭#1结束如果案例4关闭子菜单文本1.text=end end选择text1.setfocus end sub，a，34，对应于编辑菜单中每个菜单项的事件代码如下：private subedi _ click(索引为整数)I=Index选择案例1案例0剪切剪贴板. settext text 1 . seltext=Case 1复制剪贴板. settexttext1.seltextcase2粘贴文本1

16、。sel text=Clipb Oakland . gettext()case 3 clear text 1 . sel text=end select end sub，a，35，4 . 1 . 5 task 5弹出菜单。虽然下拉菜单可以根据程序的运行情况动态调整其可见性和有效性，也可以动态增加或减少菜单项，但它对用户的当前操作跟踪不够。弹出式菜单可以为用户提供更加方便灵活的操作方式。弹出式菜单是独立于表单菜单栏出现在表单中的浮动菜单。弹出菜单在表单中的位置取决于您单击鼠标按钮(通常是右键单击)时指针的位置，弹出菜单也称为上下文菜单或快捷菜单。A，36，创建弹出菜单的具体操作步骤如下：(1)先用菜单编辑器创建菜单。此步骤与创建下拉菜单的方法相同，只是主菜单项的“可见”属性