在考生文件夹下有表“订货”和“客户”。设计一个名为“cd1”的菜单,荣单中有两个菜单项“计算”和“关闭”。 程序运行时,单击“计算”菜单项完成下列操作: ①根据“订货”表中数据,更新“客户”表中的“订单编号”和“总金额”字段的值。即将“订货

admin2010-08-26  23

问题 在考生文件夹下有表“订货”和“客户”。设计一个名为“cd1”的菜单,荣单中有两个菜单项“计算”和“关闭”。
    程序运行时,单击“计算”菜单项完成下列操作:
    ①根据“订货”表中数据,更新“客户”表中的“订单编号”和“总金额”字段的值。即将“订货”表中订单编号相同的订货记录的“单价”与“数量”的乘积相加,填入客户表中对应“订单编号”和“总金额”字段。
    ②单击“关闭”菜单项,程序终止运行。

选项

答案①选择【文件】→【新建】命令,选择“菜单”,单击“新建文件”按钮,再单击“菜单”按钮,打开菜单设计器,在“菜单名称”中输入“计算”,在“结果”下拉列表框中选择“过程”,单击下一行,输入菜单名称“关闭”,在“结果”下拉列表框中选择“命令”,在右边的文本框中编写命令:SET SYSMENU TO DEFAULT。 ②在菜单设计器中单击选定菜单名称下刚创建的“计算”行,单击“创建”按钮创建“计算”过程。输入以下代码: OPEN DATABASE订货.dbc USE订货 SELECT订货 GO TOP DO WHILE.NOT.EOF() a=订单编号 b=客户编号 c=单价*数量 UPDATE客户SET 总金额=总金额+c WHERE客户编号=b AND订单编号=a SELECT订货 SKIP ENDDO CLOSE ALL ③选择【菜单】→【生成】命令,将菜单保存为“cd1”,生成一个菜单文件“cd1.mpr”。关闭菜单设计窗口,在命令窗口输入命令:DO cd1.mpr,看到Visual FoxPro的菜单栏被新建的菜单所代替,单击“计算”菜单命令执行计算过程,单击“关闭”菜单命令将恢复系统菜单。

解析
转载请注明原文地址:https://jikaoti.com/ti/bAe0FFFM
0

最新回复(0)