【正确答案】正确答案:【操作步骤】 步骤1:命令窗口执行:
CREATE FORM myform
,打开表单设计器新建表单。设置表单(forml)的Caption属性为“考试”。 步骤2:命令窗口执行:
CREATE MENU mymenu,
在“新建菜单”对话框中单击“菜单”按钮,打开菜单设计器。 步骤3:在菜单设计器“菜单名称”列的文本框中依次输入“计算”和“退出”两个主菜单名,将两个菜单项的“结果”都设置为“过程”,分别单击两个过程后面的“创建”按钮打开过程编辑器,编写过程代码。 步骤4:两个过程代码如下: *****“计算”菜单命令的过程代码***** CLOSE ALL USE orders&&以orders表为当前表 DO WHILE NOT EOF() SELECT SUM(Orderitems.数量*Goods.单价)ZJE;FROM订单管理!orderitems INNER JOIN goods; ON Orderitems.商品号=Goods。商品号; WHERE Orderitems.订单号=Orders.订单号;GROUP BY Orderitems.订单号; INTO ARRAY TEMP REPLACE总金额WITH TEMP SKI P ENDDO *****“退出”菜单命令的过程代码*****
myfoorm:release
步骤5:执行【显示】→【常规选项】菜单命令,在“常规选项”对话框中勾选“顶层表单”复选框,单击“确定”按钮,保存修改。 步骤6:执行【菜单】→【生成】菜单命令,在弹出的对话框中单击“是”按钮,弹出“生成菜单”对话框,单击“生成”按钮生成一个可执行的菜单文件(mymenu.mpr)。 步骤7:命令窗口执行:
MODIFY FORM mvform
,打开表单设计器。选中表单,设置表单(forml)的ShowWindow属性值为“2.作为顶层表单”。 步骤8:编写表单的LOAD事件代码如下:
DO mvmenu.mpr WITH THIS,.T.
步骤9:单击“常用”工具栏中的“运行”查看结果,保存表单文件,并分别执行“计算”和“退出”菜单命令。
【答案解析】