第七章 自定义菜单与工具栏
access菜单和工具栏知识
菜单和工具栏知识(1)-修改用户界面的工具有两种自定义菜单栏和工具栏的工具：共享“自定义”对话框和Visual Basic。
虽然，在每个Off ice应用程序之间，“自定义”对话框仍有很小的区别，但是用于修改菜单栏和工具栏的可编程对象在所有的应用程序中都是相同的。
本节讲述了“自定义”对话框和共享可编程对象，以及何时和怎样使用这些工具。
“自定义”对话框Office应用程序(包括Outlook)提供了相同的接口－“自定义”对话框－来对Visual Basic应用程序进行设计时刻更改。
对菜单栏和工具栏的设计时刻更改是指在应用程序运行前的任何更改。
这包括添加、删除、移动、恢复菜单部件和工具栏控件，以及设置它们在运行时条件改变后不会改变的属性。
这一节讨论怎样使用“自定义”对话框和VB代码来修改菜单栏和工具栏。
在两种技术都可作同样修改的场合下，使用“自定义”对话框能更快和更容易地完成设计时刻更改。
显示“自定义”对话框在“视图”菜单里，指到“工具栏”，然后单击“自定义”。
以下图示是PowerPoint 中“自定义”对话框里的“工具栏”一表。
Microsoft Access，Microsoft Excel，和Microsoft Word和Microsoft PowerPoint一样，都在“自定义”对话框(含“工具栏”表，“命令”表和“选项”表)中提供了相同的控件，但是前三种应用软件还在“工具栏”表和“命令”表中包含了其他一些元素，专门用于这些软件本身的自定义。
这些元素将在下面的段落中进行介绍。
Microsoft Access “工具栏”表包含一个“属性”按钮，用来显示“工具栏属性”对话框。
使用这个对话框来设置内制属性或自定义菜单栏和工具栏。
关于使用“工具栏属性”对话框的详细说明，请参考“Building Applications with Microsoft Access 97”的第一章。
Microsoft Excel “工具栏”表包含一个“附加”按钮，用来显示“附加工具栏”对话框。
使用VBA创建自定义菜单和工具栏
使用VBA创建自定义菜单和工具栏在Microsoft Office软件中，自定义菜单和工具栏是提高工作效率的重要工具。
通过使用VBA（Visual Basic for Applications）编程语言，可以轻松创建自定义菜单和工具栏，以满足个人或团队的需求。
在本文中，我将介绍如何使用VBA创建自定义菜单和工具栏，同时提供一些实用的示例来帮助读者了解如何在不同的Office应用程序中应用这些技巧。
首先，在应用程序打开的情况下，打开VBA编辑器。
可以通过按下`Alt + F11`快捷键，或在“开发者”选项卡中点击“Visual Basic”按钮来打开VBA编辑器。
接下来，我们将创建一个自定义菜单。
在VBA编辑器中，点击“插入”菜单，然后选择“模块”，这将创建一个新的代码模块。
在代码模块中，输入以下代码：```Sub CreateCustomMenu()Dim cMenuBar As CommandBarDim cMenu As CommandBarPopup'删除已存在的自定义菜单On Error Resume NextmandBars("Custom Menu").DeleteOn Error GoTo 0'创建新的自定义菜单Set cMenuBar = mandBars.Add(Name:="Custom Menu", _Position:=msoBarTop, MenuBar:=False, Temporary:=True)Set cMenu = cMenuBar.Controls.Add(Type:=msoControlPopup, Temporary:=True)With cMenu.Caption = "Custom Menu"'添加菜单项.Controls.Add(Type:=msoControlButton, Temporary:=True).Caption = "菜单项1".Controls.Add(Type:=msoControlButton, Temporary:=True).Caption = "菜单项2".Controls.Add(Type:=msoControlButton, Temporary:=True).Caption = "菜单项3"End WithEnd Sub```在上面的代码中，我们首先删除已经存在的名为“Custom Menu”的自定义菜单，以确保我们创建的菜单是最新的。
自定义工具栏和菜单
自定义工具栏和菜单一、概述：学习如何在Microsoft® Office 程序中更改现有的工具栏和菜单（包括快捷菜单），以及如何创建自己的工具栏和菜单。
您知道可以将所有最常用的命令包含在您自己的菜单中吗？您知道您可以在现有工具栏上添加和删除按钮吗？如果您使用鼠标，本课程将向您展示如何创建您自己的工具栏和菜单，以及如何更改现有的工具栏和菜单。
二、开始之前尽管Office 程序具有高度的自定义功能，但是某些自定义功能很难找到，因为人们不常使用它们。
您会发现具有自己的设置多么有用。
而且，建立自己的设置非常简单。
例如，如果在工作时需要插入大量的艺术字，但是又不经常使用“艺术字”工具栏的其他项，则将“插入艺术字”按钮添加到某个随时使用的工具栏上就可以避免混乱。
另外还可以为您节省时间和精力，因为您减少了操作时所需的击键和鼠标单击的次数。
在熟练掌握Office 技能之前，您最好还是不要过多更改。
应该集中于创建自己的菜单和工具栏，而不要修改内置菜单和工具栏。
在第一节课中将详细讨论如何更改默认设置。
三、为什么要自定义？在开始进行自定义之前，一定要了解在Office 程序中所发生的对菜单和工具栏所做的自动调整。
第一次启动Office 程序时，出现的仅仅是最基本的命令。
因此当您进行操作时就需要调整菜单和工具栏以便只出现最常用的命令和按钮。
如果菜单或工具栏的使用次数没有达到一定数目，则该命令或按钮就会“离开”菜单或工具栏。
Office 将逐渐适应您的工作方式，而且尝试为您进行自定义。
在更改默认工具栏或菜单之前应该仔细考虑所要完成的任务。
更改现有工具栏或菜单有可能导致在其他课程、书籍和帮助中执行任务和使用说明变得困难，因为它们全都参照的是Office 程序的标准配置。
比较好的选择是尽可能单独保留现有功能，并创建自己的新工具栏或菜单。
当然，还需要考虑公司的系统管理员是否已经对Office 程序进行了自定义。
如果的确是这样，则可以进行更改并且不能再恢复为默认设置。
AutoCAD自定义菜单和工具栏
AutoCAD自定义菜单和工具栏2012-12-22 00:00一、很多用户在使用自己编写的lisp命令时，每次启动CAD都进行加载，影响了效率，下面介绍的方法可以解决这一问题。
1：首先找到acad.mnl文件，系统默认安装在Application Data\Autodesk\AutoCAD 200i\Support，当然你可将此文件移到你的CAD目录下2：请将你自己编写的AAA.lsp文件拷入ACAD的Support目录下，如果路径有指到你的目录也可以不用拷入。
添加以下文本到acad.mnl。
(if(null C:XXX)(load"AAA")(princ));加载并执行你自己编写的AAA.lsp之XXX命令。
二、自动加载自己编写的菜单：添加以下文镜絘cad.mnl(if(null (menugroup "你的工具條"))(command "menuload" "BBB")(princ));加载你的工具条菜单BBB.mnu之"你的工具條"对于菜单我当时就晓得修改ACAD.MNU，先分析一下ACAD.MNU（它在哪里？汗，你在CAD 安装路径搜索一下试试，对于二次开发的软件如南方CASS，那就要在CASS安装目录搜索了），除了注释，我们看到的第一句有用的话就是“***MENUGROUP=ACAD”，这句话什么意思呢？顾名思义并结合注释我们晓得，这里是讲这是一个菜单组“MENUGROUP”，菜单组的名字叫“ACAD”。
其实，在AutoCAD这个环境里，可以加载多个菜单组，但是只能有一个主体菜单，其他的叫局部菜单。
主体菜单的加载命令是“MENU”，局部菜单的加载命令是“MENULOAD”。
我们继续分析ACAD.MNU文件，向下仔细看不难发现，此文件组织是按段组织的，每一段的开始都是以“***”开始后面注以段的关键字标识。
VBA中的菜单与工具栏的自定义
VBA中的菜单与工具栏的自定义自定义菜单和工具栏是VBA编程中非常有用的功能。
通过自定义菜单和工具栏，我们可以为VBA应用程序增加更多的功能和交互性，以提高用户体验和效率。
本文将介绍如何在VBA中进行菜单和工具栏的自定义，以及一些常用的技巧和注意事项。
一、自定义菜单在VBA中，可以通过代码来自定义菜单条目、快捷键和相应的事件。
下面是一个简单的示例，展示了如何创建一个自定义菜单：Sub CustomizeMenu()'创建一个弹出菜单并添加菜单条目Dim menuBar As CommandBarSet menuBar = mandBars.Add("Custom Menu", msoBarPopup)Dim menuItem As CommandBarControlSet menuItem = menuBar.Controls.Add(Type:=msoControlButton)With menuItem.Caption = "菜单项1".OnAction = "MenuItem1_Click"End With'显示菜单menuBar.ShowPopupEnd SubSub MenuItem1_Click()'在此处编写菜单项1的点击事件处理代码End Sub以上代码通过创建一个弹出菜单“Custom Menu”，并在菜单中添加了一个菜单项“菜单项1”。
点击菜单项时，会触发“MenuItem1_Click”事件处理过程。
需要注意的是，菜单项的点击事件应该单独编写，用于处理菜单项的具体操作。
二、自定义工具栏除了自定义菜单，我们还可以在VBA中自定义工具栏，以方便用户进行常用操作的快速访问。
下面是一个简单的示例，展示了如何创建一个自定义工具栏：Sub CustomizeToolbar()'创建一个新的工具栏，并指定位置和名称Dim toolbar As CommandBarSet toolbar = mandBars.Add(Name:="Custom Toolbar", Position:=msoBarTop)'添加工具栏按钮Dim toolbarButton As CommandBarButtonSet toolbarButton = toolbar.Controls.Add(Type:=msoControlButton) With toolbarButton.Caption = "按钮1".OnAction = "ToolbarButton1_Click".Style = msoButtonIconAndCaption.FaceId = 3End With'显示工具栏toolbar.Visible = TrueEnd SubSub ToolbarButton1_Click()'在此处编写工具栏按钮1的点击事件处理代码End Sub以上代码创建了一个新的工具栏“Custom Toolbar”，并在工具栏中添加了一个按钮“按钮1”。
用VBA自定义WORD菜单和工具栏
用VBA自定义WORD菜单和工具栏，实现多风格界面使用一个包含VBA代码的Word模板文件，通过“加载”方式直接运行，运行后将在Word XP的主界面中新增菜单和工具栏，并提供了几套适合不同工作环境的界面布局，单击相应菜单即可实现不同风格界面布局的切换。
标准风格：显示主菜单栏以及常用、格式两个工具栏，并将文本编辑区设置为“蓝底白字”。
简单风格：仅显示主菜单栏和程序新建的工具栏，并将文本编辑区恢复为“白底黑字”，如图1所示。
单击工具栏上的按钮，则会显示对话框。
绘图和制表风格：显示主菜单栏和常用、格式、绘图、图片、符号栏以及表格和边框工具栏等，并将文本编辑区恢复为“白底黑字”。
多风格界面的实现方法：一、创建工具栏和菜单的相关知识：mandBars集合Office软件中，每个软件所有的工具栏均可用该集合来代表，该集合可通过名称或索引号来指定菜单栏或工具栏，如“CommandBars("Formatting")”，即通过名称“Formatting”指定了“格式工具栏”。
Add方法用于新建工具栏，并返回CommandBar对象。
mandBar对象该对象代表工具栏，新建工具栏的控件均以该对象为载体，是VBA工具栏开发的核心对象，其常用方法和属性如下：Position属性：用于设置工具栏的位置，可通过VBA常量将工具栏的位置设置为置顶、居左、居右、置下或浮动。
Visible属性：用于设置工具栏是否可见。
Enabled属性：用于设置工具栏是否可用。
Reset方法：将内置工具栏的设置重置为默认设置，删除其中的自定义控件，在恢复软件原有工具栏或菜单时非常有用。
mandBarPopup 对象该对象代表工具栏中的一个弹出式控件，其实Office软件的菜单也可理解为一个弹出式的控件，而菜单栏可以视为“另类”的工具栏。
因此，通过该对象即可添加菜单栏，方法和添加工具栏类似。
mandBarButton对象该对象代表工具栏的按钮控件，是常用的工具栏二次开发控件，其常用方法和属性如下：OnAction属性：用于设置VBA代码过程名（该代码过程不可使用参数），该过程在单击按钮后运行。
6.2 自定义菜单及工具栏
浙江省普通高中选修课网络课程
EXCEL VBA
编程入门
二、创建工具栏
添加一个新的命令栏 ：
采用CommandBars 集合对象的Add方法。
以下示例创建一个自定义工具栏“Custom1”， 并将其作为浮动工具显示。
Set cbar1 = CommandBars.Add(Name:="Custom1", Position:=msoBarFloating) cbar1.Visible = True
浙江省普通高中选修课网络课程
EXCEL VBA
编程入门
一、问题的提出
EXCEL（Application 对象）
命令栏控件 CommandBarControl 命令栏控件 CommandBarControl 命令栏控件 CommandBarControl 命令栏控件 CommandBarControl 命令栏控件（按钮） CommandBarButton 命令栏控件（组合框） CommandBarComboBox 命令栏控件（弹出式） CommandBarPopup 命令栏控件集合 CommandBarControls
commandbarbuttoncommandbarcomboboxcommandbarpopup命令栏控件commandbarcontrol命令栏控件集合commandbarcontrols命令栏控件commandbarcontrol命令栏控件commandbarcontrol代表命令栏中的一个按钮控件代表命令栏中的一个组合框控件代表命令栏中的一个弹出式控件浙江省普通高中选修课网络课程excelvbaexcelvba编程入门编程入门一问题的提出命令栏控件commandbarcontrol命令栏控件集合commandbarcontrolsexcelapplication对象命令栏对象工具栏commandbar命令栏对象菜单栏commandbar命令栏对象弹出式菜单commandbar命令栏控件commandbarcontrol命令栏控件按钮commandbarbutton命令栏控件commandbarcontrol命令栏控件commandbarcontrol命令栏控件组合框commandbarcombobox命令栏集合commandbars命令栏控件弹出式commandbarpopup浙江省普通高中选修课网络课程excelvbaexcelvba编程入门编程入门二创建命令栏工具栏步骤
VBA实现自定义菜单与工具栏的步骤与技巧
VBA实现自定义菜单与工具栏的步骤与技巧自定义菜单和工具栏是VBA中非常有用的功能，能够提供更加灵活和高效的用户界面。
通过自定义菜单和工具栏，我们可以根据自己的需求添加或删除菜单项和工具按钮，使得用户能够方便地访问所需的功能。
本文将介绍如何使用VBA实现自定义菜单与工具栏的步骤与技巧。
一、创建自定义菜单要创建自定义菜单，首先需要打开Visual Basic编辑器（VBE），然后按下ALT+F11快捷键。
在VBE中，选择“插入” -> “用户窗体”或者右键单击项目资源管理器中的该工作簿并选择“插入模块”。
在新的用户窗体或模块中，输入以下代码，以创建一个名为"CustomMenu"的自定义菜单。
```vbaSub CreateCustomMenu()Dim cBar As CommandBarDim cBarControl As CommandBarControl' 如果已经存在名称为"CustomMenu"的菜单，则删除它On Error Resume NextmandBars("CustomMenu").DeleteOn Error GoTo 0' 创建自定义菜单Set cBar = mandBars.Add(Name:="CustomMenu", Position:=msoBarPopup, _MenuBar:=False, Temporary:=True)' 添加菜单项Set cBarControl = cBar.Controls.Add(Type:=msoControlButton)With cBarControl.Caption = "菜单项1".OnAction = "Macro1"End WithSet cBarControl = cBar.Controls.Add(Type:=msoControlButton)With cBarControl.BeginGroup = True.Caption = "菜单项2".OnAction = "Macro2"End WithEnd SubSub Macro1()' 菜单项1的宏代码End SubSub Macro2()' 菜单项2的宏代码End Sub```在创建的自定义菜单中，我们通过`CommandBar`对象和`CommandBarControl`对象来创建和添加菜单项。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第七章自定义菜单作为应用程序最常用的功能组织形式，菜单设计在程序开发中是必不可少的。
Visual FoxPro 支持两种类型的菜单：普通菜单和快捷菜单。
普通菜单用来列出整个程序的各种功能，用户通过点击各个菜单项实现对相应程序功能的调用。
普通菜单可以单独运行，也以可附着在表单窗口上成为SDI（单文档界面）菜单。
快捷菜单通常在单击鼠标右键时出现，它列出了与当前对象密切相关的操作选项，用户通过选择其中的菜单项快速完成相应的操作。
创建菜单后将生成两种类型的文件：（1）菜单定义文件。
该文件在编辑菜单项时产生，其文件扩展名为.mnx；（2）菜单程序文件。
该文件由菜单定义文件生成的可执行的菜单程序文件，其文件扩展名.mpr。
7.1 菜单规划应用程序的实用性一定程度上取决于菜单系统的质量。
在设计菜单系统时，必须考虑下列准则：（1）按照用户所要执行的任务组织系统，而不要按应用程序的层次组织系统。
只要查看菜单和菜单项，用户就可对应用程序的组织方法有一个感性认识。
因此，要设计好这些菜单和菜单项，必须了解用户思考问题和完成任务的方法。
（2）合理排列菜单组和菜单项，给每个菜单组（项）定义一个有意义的菜单标题。
按照菜单项的使用频率、逻辑顺序或字母顺序组织菜单组（项）。
当菜单项较多时，按字母顺序排列便于查看菜单项。
（3）在菜单项的逻辑组之间放置分隔线，增强菜单项的可读性。
（4）将每组菜单项的数目限制在一个屏幕之内。
如果菜单项的数目超过了一屏幕，则应为其中的一些菜单项创建子菜单。
（5）为菜单和菜单项设置访问键或键盘快捷键。
（6）使用能够准确描述菜单项的文字。
描述菜单项时，应使用日常用语而非计算机术语。
同时，说明选择一个菜单项产生的效果时，应使用简单、生动的动词，而不要将名词当作动词使用。
另外，用相似语句结构来说明菜单项，保持风格的一致性。
（7）在菜单项中混合使用大小写字母。
只在特别强调时才使用大写字母。
7.2 菜单设计器Visual FoxPro 系统提供了“菜单设计器”来创建、定制菜单系统，为用户提供了一个友好的人机交互界面。
使用“菜单设计器”可方便地创建菜单、菜单项及其子菜单，并对菜单项进行分组等。
有三种方式可以打开“菜单设计器”对话框：（1）菜单方式。
选菜单【文件（F ）】→【新建（N ）】，在“新建”对话框中选“菜单”，再单击【新建文件(N)】按钮，如图7-1所示，此时将打开如图7-2所示的“新建菜单”对话框。
（2）项目管理器方式。
在“项目管理器”的“其他”选项卡中选择“菜单”选项，再单击【新建】按钮，打开如图7-2所示的“新建菜单”对话框。
（3）命令方式。
在命令窗口中输入以下命令，打开如图7-2所示的“新建菜单”对话框。
CREATE MENU 或MODIFY MENU <文件名>MODIFY 命令中的<文件名>为菜单定义文件，其扩展名为 .mnx ，可以缺省。
若<文件名>为新文件，则新建菜单文件，否则打开已经存在的菜单。
在图7-2的对话框中根据实际需要选择“菜单”或“快捷菜单”，便可打开“菜单设计器”（这里选“菜单”），如图7-3所示。
由图7-3可见，菜单设计器的窗口组成如下：（1）“菜单名称”栏指定菜单项的名称，即程序运行时显示的菜单标题，并非内部名字。
该栏左侧有一个“移动指示器”（Mover ），用于改变当前菜单项在菜单列表中的位置。
图7-1 “新建”对话框图7-2“新建菜单”对话框图7-3 菜单设计器为方便操作，在使用菜单时，可以使用菜单项的访问键。
设置菜单项访问键的方法是：在要作为访问键的字符前加上“\<”字符窜。
如在“菜单名称”栏中输入菜单项名称为“数据浏览（\<B ）”，那么字母B 就是该菜单项的访问键，菜单运行时，按【Alt 】+B 便可选定该菜单项。
为增强可读性，可使用分隔线将内容相关、功能相近的菜单项分隔成组。
例如，图7-4是Visual FoxPro 的“编辑”菜单，“撤消”及“重做”分为一组，“剪切”、“复制”、“粘贴”、“选择性粘贴”和“清除”分为一组，Visual FoxPro 系统在两组菜单项之间插入一条水平的分隔线。
要对菜单项进行分组，操作方法是：在“菜单名称”栏中，键入“\-”，便可以创建一条分隔线。
拖动“\-”提示符左侧的按钮，可将分隔线移动到所需的位置。
（2）“结果”栏该栏用于指定当该菜单项被选中时产生的动作。
它有4个选项，包括：① 子菜单（Submenu ）：选择此选项，表示该菜单项包含一个子菜单，当菜单运行时，若用户选取该菜单项将弹出它的子菜单。
选择此项后，结果列右侧将出现一【编辑】按钮，单击此按钮将进入下一级菜单设计窗口。
② 命令（Command ）：选择此选项，列表框的右侧将出现一个输入框，用于输入一条具体的命令。
当用户选择该菜单项时，执行该命令。
③ 过程（Procedure ）：用于定义一个与菜单项相关联的过程，当用户激活该菜单项时将执行此过程代码。
选择此项时，其右侧将出现一个【创建】按钮，单击此按钮将启动过程编辑窗口，用于输入和编辑过程代码。
若过程代码已经存在，则列表框右侧出现的将是【编辑】按钮，而不是【创建】按钮。
④ 填充名称（Pad Name ）：选择此选项，列表框的右侧将出现一个输入框，用于输入自定义的菜单项内部名字，此名字的命名规则与Visual FoxPro 中变量的命名规则相同。
（3）“选项”栏图7-5 “提示选项”对话框图7-4 菜单项分组结果单击该栏按钮将弹出“提示选项”对话框，如图7-5所示。
该对话框用于设置菜单项的各种高级属性，如快捷方式、菜单项说明信息等。
当在对话框中定义了菜单项的属性后，按钮上就出现符号“√”。
（4）“菜单级”栏：显示当前菜单项所处的菜单级别，提供用户选择所要处理的菜单或子菜单。
（5）“预览”按钮：预览正在设计的菜单，可检查菜单的层次关系及提示等是否正确。
（6）“插入”按钮：在当前菜单项的前面插入一个新的菜单项。
（7）“删除”按钮：删除当前的菜单项。
7.3 创建普通菜单Visual FoxPro的菜单有两种：普通菜单和快捷菜单。
两种菜单的创建过程非常相似，基本步骤为：（1）规划好菜单系统之后，使用以上介绍的办法打开菜单设计器；（2）在菜单设计器中创建、编辑各菜单项，生成菜单定义文件（扩展名为.MNX）；（3）选菜单【菜单（M）】→【生成（G）...】生成菜单的可执行文件（扩展名为.MPR）；（4）运行菜单程序。
菜单的新建有两种选择模式：①使用“快速菜单”从已有的Visual FoxPro 菜单系统定制；②自定义菜单系统。
7.3.1 利用“快速菜单”创建菜单利用“快速菜单”创建菜单系统的操作步骤如下：（1）打开菜单设计器。
（2）从【菜单（M）】菜单中，选择【快速菜单（Q）】命令。
（3）通过添加或更改菜单项定制菜单系统。
拖动移动指示器可以改变菜单栏上各菜单项的位置。
快速菜单的界面如图7-6所示。
点击【编辑】按钮可编辑相应的子菜单项，如图7-7所示，单击选项按钮则打开相应的“提示选项”对话框，如图7-8。
7.2.2创建自定义菜单系统“快速菜单”的创建虽然简单快捷，但它是在Visual FoxPro 系统菜单的基础上图7-6 “快速菜单”界面图7-7 子菜单项图7-8 “提示选项”对话框进行增删的，其功能往往不符合我们的实际需求。
自定义菜单是用户根据系统的需要在空白的菜单设计器上自行设计的下拉菜单。
自定义菜单的“结果”项除从菜单设计器提供的4个选项子菜单、命令、填充名称、过程进行选择外，还可以利用菜单设计器上提供的【插入栏】按钮打开“插入系统菜单栏”对话框窗口，从中选择Visual FoxPro 系统内置的菜单项，如图7-9所示。
例7-1 设计学生管理系统的菜单系统，其主菜单包括“文件”、“编辑”、“数据 查询”、“数据浏览”、“数据维护”、“打印”、“退出”等菜单项，保存的文件名为“STU.MNX ”。
操作步骤如下：（1）利用7.2节介绍的三种办法中的任意一种新建一菜单文件，打开如图7-3所示的“菜单设计器”窗口。
（2）在“菜单名称”中输入本例中的菜单项名称，如图7-10所示。
（3）设计“文件（F ）”和“编辑（E ）”菜单。
图7-10 STU 主菜单图7-9 “插入系统菜单栏”窗口① 在“菜单设计器”的菜单名称中输入“文件（\<F ）”和“编辑（\<E ）”两个菜单项后，分别单击“子菜单”项旁边的【创建】按钮，进入下一级子菜单的设计；② 单击“菜单设计器”上的“插入栏（B ）…”按钮，打开如图7-9所示的【插入系统菜单栏】对话框，为“文件（\<F ）”菜单添加“关闭”、“保存”和“另存为”菜单项；③ 仿照②的操作，为“编辑（\<E ）”菜单添加“撤销”、“重做”、“还原”、“剪切”、“复制”、“粘贴”菜单项，并创建分隔线。
效果如图7-11和7-12所示。
（4）设计“数据查询”菜单项。
单击“子菜单”项右边的【创建】按钮，进入下一级子菜单的设计。
为“数据查询”项添加三个子菜单项，用于实现“查询学生档案”、“查询学生成绩”、“查询选课情况”的功能，效果如图7-13所示。
图7-11 “文件”项子菜单图7-12 “编辑”项子菜单7-13 数据查询子菜单各菜单项的命令代码如下：do form dacx.scx && 打开档案查询表单dacx.scxdo form cjcx.scx && 打开成绩查询表单cjcx.scxdo form xkcx.scx && 打开选课查询表单xkcx.scx（5）设计“数据浏览”菜单项。
单击“子菜单”项旁边的“创建”按钮，进入下一级子菜单的设计。
“数据浏览”项包括“学生档案”、“学生成绩”、“选课情况”三个子菜单项，效果如图7-14所示。
各菜单项的命令代码如下：do form da.scx && 打开档案浏览表单da.scxdo form xk.scx && 打开选课浏览表单xk.scx“学生成绩”菜单项结果采用“过程”，其具体代码如下：USE xscj.dbf && 打开学生成绩表brow && 浏览学生成绩表图7-14 数据浏览子菜单（6）设计“退出”菜单项的子菜单项。
“退出”菜单有“还原系统菜单”和“退出系统”两个子菜单，分别用相应的命令完成，具体代码如下：set sysmenu to default && 返回系统菜单do form quit.scx && 打开退出表单quit.scx图7-15 退出子菜单（7）保存菜单文件。
从Visual FoxPro系统菜单【文件（F）】中选择【保存（S）】或按Ctrl+W组合键，打开“另存为”对话框窗口，输入“STU”文件名后保存菜单文件。