简答题
VF
2017-03-30
在考生文件夹下创建一个下拉式菜单mymenu．mnx，并生成菜单程序mymenu．mpr。运行该菜单程序时会在当前Visual FoxPro系统菜单的末尾追加一个“考试”子菜单，如下图所示。
“计算”和“返回”菜单命令的功能都通过执行“过程”完成。
“计算”菜单命令的功能如下：
(1)用ALTER TABLE语句在order表中添加一个“总金额”字段，该字段为数值型，宽度为7，小数位数为2。
(2)根据orderitem表和900ds表中的相关数据计算各订单的总金额，其中，一个订单的总金额等于它所包含的各商品的金额之和，每种商品的金额等于其数量乘以单价，填人刚建立的字段中。
“返回”菜单命令的功能是恢复到Visual FoxPro的系统菜单。
菜单程序生成后，运行菜单程序，并依次执行“计算”和“返回”菜单命令。
参考答案
暂无
答案解析
【解题思路】按要求建立菜单，本题将计算出的总金额添加到表中字段部分较难，需要为表建立临时联系。
【操作步骤】
步骤1：新建一个菜单，按要求输入菜单项的名称。
步骤2：写入菜单项“计算”的代码如下。
* * * * * “计算”菜单项中的代码* * * * *
ALTER TABLE ORDER ADD总金额N(7，2)
SELECT Orderitem．订单号，sum(goods.单价* orderitem．数量)as总金额;
FROM goods，orderitem ;
WHERE Goods．商品号=orderitem．商品号;
GROUP BY Orderitem．订单号;ORDER BY Orderitem．订单号;
INTO TABLE temp．dbf
CLOSE ALL
SELECT 1
USE TEMPINDEX ON订单号TO ddh1
SELE 2
USE ORDER
INDEX ON订单号TO ddh2
SET RELATION T0订单号INTO ADO WHILE．NOT．EOF()
REPLACE总金额WITH temp．总金额
SKIP
ENDDO
BROW
* * * * * * * * * * * * * * * * * * * * * * * * * *
步骤3：写入菜单项“返回”中的过程代码为SET SYSMENU TO DEFAULT
步骤4：保存菜单名为“mymenu”并生成可执行文件。运行菜单。
【操作步骤】
步骤1：新建一个菜单，按要求输入菜单项的名称。
步骤2：写入菜单项“计算”的代码如下。
* * * * * “计算”菜单项中的代码* * * * *
ALTER TABLE ORDER ADD总金额N(7，2)
SELECT Orderitem．订单号，sum(goods.单价* orderitem．数量)as总金额;
FROM goods，orderitem ;
WHERE Goods．商品号=orderitem．商品号;
GROUP BY Orderitem．订单号;ORDER BY Orderitem．订单号;
INTO TABLE temp．dbf
CLOSE ALL
SELECT 1
USE TEMPINDEX ON订单号TO ddh1
SELE 2
USE ORDER
INDEX ON订单号TO ddh2
SET RELATION T0订单号INTO ADO WHILE．NOT．EOF()
REPLACE总金额WITH temp．总金额
SKIP
ENDDO
BROW
* * * * * * * * * * * * * * * * * * * * * * * * * *
步骤3：写入菜单项“返回”中的过程代码为SET SYSMENU TO DEFAULT
步骤4：保存菜单名为“mymenu”并生成可执行文件。运行菜单。
