软件及软件工程-第5章

5.1项目一菜单设计5.1.1项目目标本项目实例主要任务是为“档案管理”界面添加菜单栏，如图5-1所示。5.1.2项目分析本项目实例主要运用VB6.0所提供的菜单编辑器为窗体添加菜单栏。“档案管理”界面菜单栏包括:“文件”“格式”两个顶层菜单，其中“文件”菜单中包括:“打开”“保存”“另存为”和“退出”，在“文件”菜单中可以动态显示最近打开过的文件名;“格式”菜单中包括:“字体”和“颜色”，以及下一级子菜单。下一页返回5.1项目一菜单设计5.1.3项目实现1.添加菜单栏双击“工程资源管理器”中的Form4(档案管理)窗体，进入Form4的窗体设计状态，选择“工具”→“菜单编辑器”命令，打开“菜单编辑器”对话框，如图5-2所示。按照表5-1建立各个菜单项，其中单击“下一个”按钮或“插入”按钮建立下一个菜单项，单击左右箭头按钮可调整菜单项的层次。2.编写对象事件过程代码菜单只能响应鼠标单击(Click)事件，当完成菜单编辑后，在窗体设计状态下，单击菜单项，就可以在代码编辑器中对菜单命令进行代码编写，以完成其对应的功能。下一页返回上一页下一页返回上一页下一页返回下一页返回上一页下一页返回5.1项目一菜单设计“通用”区域定义变量的代码如下。通用区域，定义了一个有关学生信息的数据类型和变量的定义上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计上一页下一页返回5.1项目一菜单设计5.1.4相关知识菜单是用户界面最重要的元素，它们使用户界面更加友好、直观。大多数应用程序都含有菜单，并通过菜单为用户提供命令。在实际的应用中，菜单可分为两种基本类型，一种是下拉式菜单，另一种是弹出式菜单。下拉式菜单，如“文件”“格式”等，这种菜单一般通过单击菜单栏中菜单标题打开;弹出式菜单则通过右击某一位置的方式打开。1.菜单的基本概念菜单在窗口内，不仅方便、直观，而目还可以使用户设计的窗口更加标准。如图5-3即为带有菜单的窗口，它主要有以下几部分组成。上一页下一页返回5.1项目一菜单设计(1)菜单栏。菜单栏在窗口标题栏下面，由一个或多个菜单标题组成。图5-1中的菜单栏由“文件”“格式”两个菜单标题组成。(2)菜单标题。单击菜单标题(如“文件”)时，将打开一个包含菜单项的下拉列表。(3)菜单项。菜单项隶属于菜单标题，它可以包含菜单命令、分隔线和了菜单标题(如“发送”)及其下的子菜单项(如“邮件收件人”)。另外，菜单及菜单项还有访问键、快捷键等，还有一种独立于菜单栏的快捷菜单。上一页下一页返回5.1项目一菜单设计2.菜单编辑器用菜单编辑器可以创建新的菜单和菜单栏、在己有的菜单上增加新命令、用自己的命令来替换已有的菜单命令以及修改和删除已有的菜单和菜单栏。（1）菜单编辑器的启动。从“工具”菜单中选择“菜单编辑器”命令或在“工具栏”上单击“菜单编辑器”按钮即可打开“菜单编辑器”对话框，如图5-4所示。（2）菜单编辑器的组成及作用如下。①其属性设置如下。标题：运行时菜单项上显示的文字，即Caption属性。如果菜单项有访问键，应在相应字母前加&字符，例如标题为“成绩管理（&C）”，则菜单上显示“成绩管理（C）”，可以按Alt+C组合键就可以打开该菜单。如果要在菜单中设置分隔线，应将作为分隔线的菜单项的标题设置为一个连接符“_”。上一页下一页返回5.1项目一菜单设计注意：顶层菜单不能为其设置快捷键。名称：菜单名称，用来唯一识别该菜单项，程序中用来引用该菜单项。索引：如果建立菜单控件数组，必须设置该属性。快捷键：用于选择菜单项对应的快捷键，快捷键将显示在菜单项的后面，按快捷键时会立刻运行一个菜单项。默认值为None，表示没有快捷键。复选：用于设定该菜单项是否被选中。在运行时，选中的菜单项前面将有一个复选标志“√”。运行时可通过代码的Checked属性来设定每个菜单项的复选状态。有效：用于设定该菜单项是否对事件作出响应。运行时可通过代码的Enabled属性来设定每个菜单项的有效状态。上一页下一页返回5.1项目一菜单设计可见：用于设定该菜单项是否可见。运行时可通过代码的Visible属性来设定每个菜单项是否可见。②其属性设置如下。菜单项移动按钮：左移、右移按钮可以调整菜单项的层次，在菜单列表框中用“…”来标志。上移、下移按钮可以调整菜单项在菜单列表框中的排列位置。“下一个”按钮：单击该按钮，光标从当前菜单项移到下一项。如果当前菜单项是最后一项，则添加一个新的菜单项。“插入”按钮：在当前选择的菜单项前插入一个新的菜单项。“删除”按钮：删除当前选中的菜单项。3.菜单的制作首先要对菜单进行设计，然后进行如下步骤的制作。上一页下一页返回5.1项目一菜单设计（1）在菜单编辑器中制作菜单，其具体步骤如下。①选取要添加菜单栏的窗体。②从“工具”菜单中选取“菜单编辑器”，或者在“工具栏”上单击“菜单编辑器”按钮。③在“标题”文本框中，输入希望在菜单栏上显示的文本。如果希望某一字符成为该菜单项的访问键，也可以在该字符前面加上一个（&）字符。如：文件（&F）。注意：菜单中不能使用重复的访问键。如果多个菜单项使用同一个访问键，则该键将不起作用。④在“名称”文本框中，输入将用来在代码中引用该菜单控件的名字。上一页下一页返回5.1项目一菜单设计注意：为了使代码更具可读和易维护，在菜单编辑器中设置Name属性时，最好用前缀来标识菜单对象，如mun；其后再紧跟顶层菜单标题的名称，如file。对于子菜单，其后再紧跟该子菜单的标题，如munFileOpen。⑤单击向左或向右箭头按钮，可以改变该控件的缩进级，从而创建子菜单。所创建的每个菜单最多可以包含5级子菜单。子菜单会分支出另一个菜单以显示它自己的菜单项。⑥如果需要，还可以设置控件的其他属性。如为菜单设置快捷键、复选框等。⑦单击“下一个”按钮就可以再建一个菜单控件；或者单击“插入”按钮可以在现有的菜单控件之前增加一个菜单控件；也可以单击向上与向下的箭头按钮，在现有菜单控件之中上下移动菜单项位置。上一页下一页返回5.1项目一菜单设计⑧如果窗体所有的菜单控件都已创建，则单击“确定”按钮可关闭菜单编辑器。（2）运行时创建和修改菜单。设计时创建的菜单也能动态地响应运行时的条件。所以运行时可以编写应用程序，实现菜单项可见或不可见控制以及增加或删除菜单项操作。菜单控件只有一个Click事件。当用户选取一个菜单控件时，一个Click事件出现。需要在代码中为每个菜单控件编写一个Click事件过程。除分隔符条外的所有菜单控件都能识别Click事件。说明：一般情况下，没有必要为一个菜单标题的Click事件过程编写代码，除非想执行其他操作，比如每次显示菜单时使某些菜单项无效。想想议议：菜单控件具有哪些属性？与基本控件有哪些区别？上一页下一页返回5.1项目一菜单设计4.弹出式菜单弹出式菜单是独立于菜单栏而显示在窗体上的浮动菜单。在弹出式菜单上显示的项目取决于右击时指针所处的位置；因而，弹出式菜单也被称为上下文菜单或快捷菜单。在Windows中，可以通过右击来激活快捷菜单。（1）显示弹出式菜单。在运行时，至少含有一个菜单项的任何菜单都可以作为弹出式菜单被显示。为了显示弹出式菜单，可使用PopupMenu方法。语法格式：

[对象名.]PopupMenu菜单名[,flags[,x[,y[,要加粗的菜单项]]]]参数说明如下。①flags：定义弹出式菜单的位置与性能（行为）。表5-2列出了可用于描述弹出式菜单的flags参数。上一页下一页返回5.1项目一菜单设计②要加粗的菜单项：指定在显示的弹出式菜单中想以粗体字体出现的菜单控件的名称。在弹出式菜单中只能有一个菜单控件被加粗。③x和y：指定弹出式菜单的位置坐标，默认为当前鼠标的坐标。要指定一个标志，应先从每组中选取一个常数，再用Or操作符将它们连起来。例如：下面语句可以显示弹出式菜单。

PopupMenumnfile，vbPopupMenuCenterAlignOrvbPopupMenuRightButton（2）用MouseUp或者MouseDown事件来检测何时右击事件发生上一页下一页返回5.1项目一菜单设计例如：在项目实例中当用户右击窗体时，显示“文件”弹出式菜单（如图5-5所示）。

PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAs_Integer,XAsSingle,YAsSingle)IfButton=2Then'检查是否右击

PopupMenufile把“文件”菜单显示为一个弹出式菜单

EndIfEndSub注意：每次只能显示一个弹出式菜单。上一页下一页返回5.1项目一菜单设计5.动态菜单许多Windows应用程序均可以在“文件”菜单下列出最近使用过的文件列表。实现这一功能的基础是使用菜单控件数组。在“菜单编辑器”窗口中加入一个菜单项（非顶层菜单），将其索引项的值设置为0，“可见”复选框的对勾去掉，在打开文件的相关事件过程中使用Load方法可以加入新的菜单项，而用Unload方法可以删除菜单项。例如，在项目实例的“文件”菜单项下方动态显示打开文件的名称。具体操作如下。（1）为“文件”菜单项添加一个子菜单项，标题为“打开文件名”，名称为openname，索引值设置为0，“可见”复选框的对勾去掉。上一页下一页返回5.1项目一菜单设计（2）选择“文件”→“打开”命令。编写代码如下。

menucounter=menucounter+1'动态菜单显示

Loadopen

name(menucounter)openname(meucounter).Caption=CommonDialog1.FileName

openname(menucounter).Visible=True运行效果如图5-6所示。如果要删除一个菜单项，可以编写以下程序。

UnloadOpenname(menucounter)menucounter=menucounter?1上一页返回5.2项目二工具栏设计5.2.1项目目标本项目实例主要任务是为档案管理界面添加工具栏，如图5-7所示。5.2.2项目分析本项目实例主要运用VB6.0所提供的工具栏控件为窗体添加工具栏。档案管理界面上要完成“打开”“保存”“字体选择”和“颜色设置”四种操作。5.2.3项目实现1.添加工具栏双击“工程资源管理器”中的Form4（档案管理）窗体，进入Form4的窗体设计状态。下一页返回5.2项目二工具栏设计（1）选择“工程”→“部件”命令，选中MicrosoftWindowsCommonControls6.0控件，并添加到工具箱。如图5-8所示。（2）双击工具箱中的ImageList按钮，在窗体上ImageList控件，右击ImageList控件，在弹出的快捷菜单中选择“属性”命令，打开ImageList控件的“属性页”对话框，在其“图像”选项卡中单击“插入图片”按钮，选择需要的所有图片，在“关键字”文本框中输入图像的标识名。如图5-9所示。（3）双击工具箱中的ToolBar按钮，在窗体上创建工具栏（在默认情况下，工具栏会紧紧地贴着窗体的标题栏）。右击工具栏，在弹出的快捷菜单中选择“属性”命令，在“通用”标签下的“图像列表”中选择要关联的ImageList控件的名称ImageList1。如图5-10所示。上一页下一页返回5.2项目二工具栏设计（4）在ToolBar控件的“属性页”对话框中打开“按钮”选项卡，单击“插入按钮”，在工具栏上添加一个空白按钮，设置相应的“标题”和“关键字”。在“图像”框中，ImageList控件中图像的“关键字”或“索引值”。重复上述操作添加更多的按钮，并将图像赋给新添加的Button对象。本项目实例中的工具按钮1、2、4的样式设置为默认值0-tbrDefault。按钮3的样式设置为5-tbrdropDown，按钮3、4的“有效性”复选框的对勾去掉，使之初始状态为False。并在设置按钮3的对话框下方进行“按钮菜单”的设置，插入按钮菜单、文本，如图5-11所示。2.编写对象事件过程代码上一页下一页返回5.2项目二工具栏设计当用户单击工具栏按钮时，会发生ButtonClick事件。可以用按钮的“索引”属性或“关键字”属性来标识被单击的按钮。上一页下一页返回5.2项目二工具栏设计上一页下一页返回5.2项目二工具栏设计5.2.4相关知识VisualBasic中使用ToolBar控件来创建工具栏非常容易且很方便。创建工具栏的步骤如下。1.向工具箱中添加MicrosoftWindowsCommonControls6.0控件（1）调出“部件”对话框。（2）在“控件”标签下选中MicrosoftWindowsCommonControls6.0复选框，单击“确定”按钮退出后，在工具箱中会增加一组控件，其中为ToolBar控件，为ImageList控件（ListImage集合）。2.在ImageList控件中插入合适图像上一页下一页返回5.2项目二工具栏设计（1）在窗体上添加ImageList控件。（2）右击ImageList控件，选择“属性”命令，显示ImageList控件的“属性页”对话框。（3）打开“图像”选项卡。（4）单击“插入图片”按钮，显示“选定图片”对话框。（5）在该对话框中找到相应的位图或图标，单击“打开”按钮。（6）在“关键字”框中输入一个字符串，为该图像赋予了Key属性。（7）重复步骤（4）～（6），直到将所需图像填充到该控件中。（8）图片添加完成后，单击“确定”按钮退出。3.为工具栏添加按钮（Button）上一页下一页返回5.2项目二工具栏设计（1）双击按钮向窗体上添加一个工具栏。在默认情况下，工具栏会紧挨着窗体的标题栏。如果在属性窗口中将其Appearance和BorderStyle属性都设置为1，可以使工具栏更加突出、漂亮。（2）将ImageList与ToolBar控件关联。①在窗体上选中ToolBar控件，然后打开“视图”菜单，选择“属性页”命令或右击该控件，在快捷菜单中选择“属性”命令，这时显示出该控件的“属性页”对话框。②在“通用”选项卡下的“图像列表”中选择要关联的ImageList控件的名称。③单击“确定”按钮退出。上一页下一页返回5.2项目二工具栏设计（3）将图像赋给Button对象。①在ToolBar控件的“属性页”对话框中单击“按钮”标签。②单击“插入”按钮，在工具栏上添加一个空白按钮。③在“图像”文本框中，输入ImageList控件的Key值（即在其“属性页”中的Key值）。④在“关键字”文本框中，输入按钮的Key值（用来区别按钮，必须惟一）。⑤若需要还可在“工具提示文本”文本框中输入按钮的简短提示。⑥单击“应用”按钮，此时空白按钮上出现相应的图案。⑦重复上述第②～④以添加更多的按钮，并将图像赋给新添加的Button对象。上一页下一页返回5.2项目二工具栏设计另外，在“属性页”的“样式”下拉列表框中还可设定Button对象的style属性。它决定了按钮的行为特点，表5-3列出了6种按钮的样式及其说明。4.为工具栏编写代码实际上，工具栏上的按钮是控件数组，当用户单击按钮（占位符和分隔符样式的按钮除外）时，会发生ButtonClick事件。在该事件中用SelectCase语句编写按钮的功能。可以用按钮的Index属性或Key属性标识被单击的按钮。状态栏显示系统信息和对用户的提示，如：系统日期、软件版本、光标的当前位置、键盘的状态等。通常位于窗体的底部。上一页返回5.3知识进阶1.创建状态栏设计时，在窗体上增加statusbar控件后，打开其“属性页”对