问答题
在
下创建一个顶层表单myform.scx(表单的标题为“考试”)，然后创建并在表单中添加菜单(菜单的名称为mymenu.mnx，菜单程序的名称为mymenu.mpr)，如下图所示。
【正确答案】
【答案解析】[微步骤]
步骤1：新建一个表单，修改表单的Caption属性为“考试”、ShowWindow属性为“2-作为顶层表单”。
步骤2：双击表单空白处，编写表单的Init。
DO mymenu.mpr WITH THIS, "myform"
步骤3：新建一个菜单，选择“显示”菜单下的“常规选项”命令，在弹出的“常规选项”对话框中勾选“顶层表单”。
步骤4：输入菜单项“计算”和“退出”，结果均选择“过程”，然后单击两个菜单项后面的“创建”按钮，分别编写如下代码。
******“计算”菜单项中的命令代码******
SELECT Orderitems.订单号, SUM(orderitems.数量*goods.单价)AS总金额;
FROM orderitems, goods;
WHERE Orderitems.商品号=Goods.商品号;
GROUP BY Orderitems.订单号;
ORDER BY Orderitems.订单号;
INTO TABLE temp.dbf
CLOSE ALL
SELE 1
USE temp
INDEX ON订单号TO ddh1
SELE 2
USE orders
INDEX ON订单号TO ddh2
SET RELATION TO订单号INTO A
DO WHILE.NOT.EOF()
REPLACE总金额WITH temp.总金额
SKIP
ENDDO
BROW
***************************************
******“退出”菜单项中的命令代码******
myform.Release
***************************************
步骤5：保存菜单名为mymenu，并生成可执行文件。
步骤6：保存表单名为myform并运行。
答案考生文件夹
步骤1：新建一个表单，修改表单的Caption属性为“考试”、ShowWindow属性为“2-作为顶层表单”。
步骤2：双击表单空白处，编写表单的Init。
DO mymenu.mpr WITH THIS, "myform"
步骤3：新建一个菜单，选择“显示”菜单下的“常规选项”命令，在弹出的“常规选项”对话框中勾选“顶层表单”。
步骤4：输入菜单项“计算”和“退出”，结果均选择“过程”，然后单击两个菜单项后面的“创建”按钮，分别编写如下代码。
******“计算”菜单项中的命令代码******
SELECT Orderitems.订单号, SUM(orderitems.数量*goods.单价)AS总金额;
FROM orderitems, goods;
WHERE Orderitems.商品号=Goods.商品号;
GROUP BY Orderitems.订单号;
ORDER BY Orderitems.订单号;
INTO TABLE temp.dbf
CLOSE ALL
SELE 1
USE temp
INDEX ON订单号TO ddh1
SELE 2
USE orders
INDEX ON订单号TO ddh2
SET RELATION TO订单号INTO A
DO WHILE.NOT.EOF()
REPLACE总金额WITH temp.总金额
SKIP
ENDDO
BROW
***************************************
******“退出”菜单项中的命令代码******
myform.Release
***************************************
步骤5：保存菜单名为mymenu，并生成可执行文件。
步骤6：保存表单名为myform并运行。
答案考生文件夹