1、【审题分析】本题主要考查的是菜单在顶层表单中的应用。主要包括两大部分的操作,即菜单设计和表单设计。操作过程可按以下步骤进行:通过菜单设计器建立菜单,注意主菜 单和子菜单的建立。菜单设计有两个关键操作:一是在菜单设计器中勾选“常 规选项” 对话框中的“顶层表 单” ,表示此菜单存在顶层表单中;二是在释放表单时,要使用表 单的文件名,即本 题可以通 过MAINFORM.RELEASE 命令释放MAINFORM 表单,注意:不要使用THISFORM.RELEASE命令释放表单。在 表 单 设 计 过 程 中 ,要 注 意 将 表 单 设 置 为 顶 层 表 单 ,通 过 表 单 的 ShowWind
2、ow属 性 值可 以 进 行 设 置 ,而 在 表 单 中 调 用 菜 单 文 件 是 在 表 单 的 Load(或 INIT)事 件 中 进 行 调 用 ,还需 要 通 过 THIS短 语 指 定 当 前 表 单 对 象 的 引 用 。其 基 本 格 式 为 :DO WITH THIS,“。【操作步骤】步骤1:在命令窗口执行命令:CREATE MENU mymenu,在弹出的“新建菜单”对话框中单击“菜单 ”图标按钮,打开菜单设计器。 在 菜 单 设 计 器 “菜 单 名 称 ”列 的 文 本 框 中依 次 输 入 “表单 ”、 “报表” 和“退出”3 个 主 菜 单 名 , “结 果 ”下
3、 拉 框 中 选 择 为 “子 菜 单 ”, 单 击 “表单” 行 的 “创 建 ”按 钮 进 入 下 级 菜 单 设 计 。步 骤 2: 在 “菜 单 名 称 ”列 依 次 输 入 子 菜 单 名 “浏览课程”和“ 浏览选课统计”,选择“结果”列都为“过程”,分别单击两个 “过程”后面的“创建”按钮打开过程编辑器,编写过程代码。 课程浏览菜单命令的过程代码:Myform.Grid1.RecordSourceType=1Myform.Grid1.RecordSource=“课 程 “ 选课统计浏览菜 单 命 令 的 过 程 代 码 :OPEN DATABASE 学 生 管 理Myform.Gr
4、id1.RecordSourceType=0Myform.Grid1.RecordSource=“sview“ 步骤3:通过“菜单级” 下拉框返回主菜单项设计界面,以同样的方法,设计“报表”菜单项的下级子菜单“预览报表”,注意选择“ 预览报表”的 “结果”项为“命令”,然后在后面的文本框中输入以下命令代码:REPORT FORM creport PREVIEW步骤4:再 次 返 回 主 菜 单 项 设 计 界 面 , 选 择 “退 出 ”菜 单 命 令 的 “结 果 ”项 为 “命 令 ”, 并输 入 命 令 语 句 :myform.RELEASE步骤5:执行【显示】【常规选项】菜单命令,在弹
5、出的“常规选项”对话框中勾选“顶层表单”复选框,然后单击 “确定”按钮,保存修改。步 骤 6: 执 行 【 菜 单 】 【 生 成 】 菜 单 命 令 , 在 弹 出 的 Visual FoxPro对 话 框 中 单 击“是 ”按 钮 , 接 着 系 统 会 弹 出 “生 成 菜 单 ”对 话 框 , 单 击 “生 成 ”按 钮 生 成 一 个 可 执 行 的 菜 单文 件 , 关 闭 菜 单 设 计 器 。步骤7:在命令窗口执行命令:MODIFY FORM myform,打开表单设计器。选中表单,在“ 属性 ”窗口中修改表单( Form1)的“ShowWindow”属性值设置为“2- 作为顶层表单”。步 骤 8: 右 击 表 单 选 择 【 数 据 环 境 】 快 捷 菜 单 命 令 , 在 表 单 数 据 环 境 中 单 击 右 键 选 择【 添 加 】 快 捷 菜 单 命 令 , 选 择 “视 图 ”单 选 项 , 将 sview视 图 添 加 到 数 据 环 境 中 。步骤9:双击表单(Form1)编写表单的 Load事件代码,代码如下:DO mymenu.mpr WITH THIS,“TTT“步骤10:单击“常用” 工具栏中的“ 运行”按钮查看结果,将表单文件保存到考生文件夹下。