(1)请编写名称为“cx”的命令程序并执行,该程序实现下面的功能:将“商品信息”进行备份,备份文件名为“b_商品信息.dbf”;将“商品信息”中“商品编号”后两位编号小于“03”(不含03)的商品的“价格”修改为原价的95%;使用“价格调整”表对商品信息的

admin2013-06-10  23

问题 (1)请编写名称为“cx”的命令程序并执行,该程序实现下面的功能:将“商品信息”进行备份,备份文件名为“b_商品信息.dbf”;将“商品信息”中“商品编号”后两位编号小于“03”(不含03)的商品的“价格”修改为原价的95%;使用“价格调整”表对商品信息的部分商品价格进行修改(按“商品编号”相同为条件)。
   (2)设计一个名称为“bd2”的表单,上面有“调整价格”和“关闭”两个命令按钮。单击“调整价格”命令按钮时,凋用“cx”命令程序实现商品价格调整;单击“关闭”命令按钮时,关闭表单。
    注意:以上两个命令按钮均只含一条语句,不可以有多余的语句。

选项

答案(1)在命令窗口中输入命令:MODI COMM cx(回车执行),打开程序文件编辑窗口,在程序文件编辑窗口中输入以下程序代码: SELECT*INTO TABLE b_商品信息FROM商品信息 UPDATE商品信息SET价格=价格*0.95 WHERE RIGHT(商品编号,2)<"03" USE价格调整 GO TOP DO WHILE.NOT.EOF() aa=商品编号 bb=价格 UPDATE商品信息SET价格=bb WHERE商品编号=aa SELECT价格调整 SKIP ENDDO CLOSE ALL 关闭程序文件编辑窗口并保存程序文件。 (2)①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Command2。 ②在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“调整价格”,将命令按钮Command2的Caption属性值修改为“关闭”。 ③双击“调整价格”命令按钮,在Click事件中输入代码:DO cx,用来执行工资调整程序。 ④双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。 ⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。

解析
转载请注明原文地址:https://kaotiyun.com/show/bHop777K
0

最新回复(0)