在考生文件夹下完成下列操作。
(1) 在 TheatDB 数据库中新建一个名为“好评” 的视图, 视图的功能是查询 2013 年 7 月 1日以后(不含) 观看的“影评” 为“好” 的评价数最多的前 10 名的电影信息; 查询结果包含电影编号、 电影名、 类型和评价数; 各记录按照评价数降序排列, 若评价数相同则按电影名升序排列。 最后利用刚创建的视图“好评” 查询视图中的全部信息, 并将结果保存到表estimate 中。
(2) 创建一个快捷菜单 MyMenu, 实现如下图所示的功能, 即通过右击表单 MyForm 中的文本框时弹出的快捷菜单实现文本框字体的设置。
具体要求如下:
①在 MyMenu 的“设置” 代码中添加接受参数语句: PARAMETERS mfRef。
②在快捷菜单 MyMenu 中添加“宋体”‘黑体” 和“楷体” 菜单项, 分别实现将调用快捷菜单的控件或对象的字体名属性(FontName) 设置为“宋体”“黑体” 和“楷体”, 这些功能都通过执行“过程” 完成。
③生成菜单程序文件。
④打开表单 MyForm, 在文本框 Text1 的 RightClick 事件代码中添加调用快捷菜单 MyMer. u的命令, 实现通过快捷菜单设置 Text1 文本字体的功能。
(1)【操作步骤】
步骤 1: 打开 TheatDB 数据库, 在数据库设计器中单击鼠标右键, 选择“新建本地视图” 命令, 在弹出的“新建本地视图” 对话框中单击“新建视图” 按钮, 然后为该视图添加表“电影” 和“观看”。
步骤 2: 在“字段” 选项卡的“可用字段” 列表框中双击“电影. 电影编号”“电影. 电影名” 和“电影, 类型” 三个字段, 使其添加到“选定字段” 列表框中; 在“函数和表达式”文本框中输入“count(观看. 影评)AS 评价数”, 并将其添加到“选定字段” 中。
步骤 3: 切换到“筛选” 选项卡, 在“字段名” 列选择“观看. 观看日期”, 在“条件” 列选择“>”, 在“实例” 列输入“{ ^2013-07 -01}”; 在“逻辑” 下拉列表中选择“AND”, 然后在下一行“字段名” 列选择“观看, 影评”, 在“条件” 列选择“=”, 在“实例” 列输入“好”。
步骤 4: 切换到“排序依据” 选项卡, 双击“count(观看. 影评)” 字段, 排序选项为“降序”;再双击“电影. 电影名” 字段, 排序选项为“升序”。
步骤 5: 切换到“分组依据” 选项卡, 双击“可用字段” 中的“电影. 电影编号” 添加到“分组字段” 中。
步骤 6: 切换到“杂项” 选项卡, 取消“全部” 复选框的勾选, 在“记录个数” 微调框中输入“10”。
步骤 7: 单击工具栏中的“保存” 按钮, 在弹出的“保存” 对话框中将视图名称保存为“好评”。
步骤 8: 单击工具栏上的“新建” 按钮, 在“文件类型” 中选择“查询”, 单击“新建文件”
按钮; 在“添加表或视图” 对话框中, 选择“视图” 单选按钮, 单击“添加” 按钮, 然后关闭该对话框。
步骤 9: 在查询设计器的“字段” 选项卡中, 将“可用字段” 列表中的字段全部添加到“选定” 字段。
步骤 10: 单击“查询” 菜单中的“查询去向” 命令, 在“查询去向” 对话框中单击“表”按钮, 在“表名” 后输入表名“estimate”, 单击“确定” 按钮; 单击工具栏中的“运行” 按钮, 运行查询。
(2)【操作步骤】
步骤 1: 单击常用工具栏中的“新建” 按钮, 在“新建” 对话框中选择“菜单”, 单击“新建文件” 按钮; 在打开的“新建菜单” 对话框中单击“快捷菜单” 按钮。
步骤 2: 在快捷菜单设计器中, 设置“菜单名称” 分别为“宋体”“黑体” 和“楷体”, “结果” 均为“过程”。
步骤 3: 分别单击三个菜单项后面的“创建” 按钮, 编写对应的过程代码。
“宋体” 菜单项中的代码: myform.Text1. FontName="宋体"
“黑体” 菜单项中的代码: myform.Text1. FontName="黑体"
“楷体” 菜单项中的代码: myform.Text1. FontName="楷体"
步骤 4: 选择“显示” 菜单中的“常规选项” 命令, 弹出“常规选项” 对话框, 在“菜单代码” 组中勾选“设置” 复选框, 在 “过程” 列表框中输入“PARAMETERS mfRef”, 最后单击“确定” 按钮。
步骤 5: 单击工具栏中的“保存” 按钮, 将菜单以 MyMenu 为文件名进行保存。 选择“菜单”菜单中的“生成” 命令, 生成可执行菜单。
步骤 6: 打开考生文件夹下的表单 MyForm, 在表单设计器中双击文本框控件, 在“过程”下拉列表框中选择 RightClick 过程, 输入命令“DO mymenu.mpr”。
步骤 7: 保存表单并运行, 在文本框处单击鼠标右键, 依次执行三个菜单项中的命令。