在考生文件夹下创建一个顶层表单myform.scx(表单的标题为“考试”),然后创建并在表单中添加菜单(菜单的名称为mymenu.mnx,菜单程序的名称为mymenu.mpr)。效果如图3-29所示。 菜单命令“统计”和“退出”的访问键分别为“T”和“R

admin2017-03-29  48

问题 在考生文件夹下创建一个顶层表单myform.scx(表单的标题为“考试”),然后创建并在表单中添加菜单(菜单的名称为mymenu.mnx,菜单程序的名称为mymenu.mpr)。效果如图3-29所示。

菜单命令“统计”和“退出”的访问键分别为“T”和“R”,功能都通过执行过程完成。
菜单命令“统计”的功能是以客户为单位、从customer和orders表中求出订单金额的和。统计结果包含“客户号”、“客户名”和“合计”3项内容,其中“合计”是指与某客户所签所有订单金额的和。统计结果应按“合计”降序排序,并存放在tabletwo表中。
菜单命令“退出”的功能是释放并关闭表单。
最后,请运行表单并依次执行其中的“统计”和“退出”菜单命令。

选项

答案步骤1:命令窗口执行: CREATE MENU mymenu,在“新建菜单”中单击“菜单”图标按钮,打开菜单设计器。在“菜单名称”列的文本框中依次输入“统计(\<T)”和“退出(\<R)”两个主菜单名,“结果”下拉框中都选择为“过程”。 步骤2:分别单击两个“过程”后面的“创建”按钮打开过程编辑器,编写如下过程代码: *****“统计”菜单命令的过程代码***** SELECT Customer.客户号,Customer.客户名,SUM(Orders.金额)AS合计; FROM 订单管理!customer INNER JOIN订单管理!orders; ON Customer.客户号=Orders.客户号; GROUP BY Customer.客户号; ORDER BY 3 DESC; INTO TABLE tabletwo.dbf *****“退出”菜单命令的过程代码***** MYFORM.RELEASE 步骤3:执行【显示】→【常规选项】菜单命令,在“常规选项”中勾选“顶层表单”复选框,然后单击“确定”。 步骤4:执行【菜单】→【生成】菜单命令,在弹出的对话框中单击“是”按钮,系统弹出“生成菜单”对话框,单击“生成”生成一个可执行的菜单文件,关闭菜单设计器。 步骤5:命令窗口执行: CREATE FORM MYFORM,打开表单设计器新建表单。修改表单(Forml)的“ShowWindow”属性值设置为“2—作为顶层表单”;将Caption属性设置为“考试”。 步骤6:双击表单( Forml),分别编写表单的Load事件代码和Destroy事件代码,代码如下: *****表单( Forml)的Load事件代码***** DO mymenu.mpr WITH THIS,"xxx" ****表单(Forml)的Destroy事件代码***** RELEASE MENU xxx EXTENDED 步骤7:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。 为顶层表单添加菜单;SQL分组与计算查询。

解析 本题主要考查了顶层表单的设计;菜单设计器的使用:SQL分组与计算查询。
通过表单的ShowWindow属性值可以设置为顶层表单,在表单的Load(或INIT)事件中调用菜单文件,通过THIS短语指定当前表单对象的引用。基本格式为:DO<菜单文件.mpr> WITH THIS[,"<菜单内部名>"];另在表单的Destroy事件中编写清除菜单的代码。
建立菜单文件时要勾选“常规选项”对话框中的“顶层表单”,另外,在菜单名称后加“\<”符号并指定一个大写字母作为访问键。
本题SQL查询使用的是分组与计算查询语句,用来计算的函数是SUM()求和函数。
转载请注明原文地址:https://jikaoti.com/ti/mpk0FFFM
0

最新回复(0)