在考生文件件下,打开名称为CDB的商品销售数据库,完成如下综合应用: 创建一个标题名为“顾客购买商品查询”、文件名为GK的表单,如图2—12所示。 表单要求如下: ①在该表单中设计两个标签、两个文本框、一个表格控件和两个命令按钳。

admin2016-12-05  34

问题 在考生文件件下,打开名称为CDB的商品销售数据库,完成如下综合应用:
    创建一个标题名为“顾客购买商品查询”、文件名为GK的表单,如图2—12所示。

    表单要求如下:
    ①在该表单中设计两个标签、两个文本框、一个表格控件和两个命令按钳。
    ②表单中两个标签的名称分别为Labell和Label2,其标题分别为“顾客号”和“应付款”:两个文本框的名称分别为Text1和Text2,前者用于输入查询的顾客号,后者用于显示该顾客的应付款;表格Grid1用于显示顾客购买商品的详细记录。
    ③两个命令按钮的功能如下:
    “查询”按钮(Command1):在该按钮的Click事件中编写程序,采用SQL语句根据第1个文本框输入的顾客号进行查询。存在格控件中显示该顾客的顾客号和购买的每件商品的商品号、商品名、单价、数量和金额,各记录按商品号升序排序。该查结果应
同时存储到表tjb.dbf中。另外需要统计该顾客的应付款,并将结果显示于Text2文本框中。
    说明:金额=单价.数量,应付款=顾客购买的商品金额合计。
    “退出”按钮(Command2):关闭并释放表单。
    注意:表格控件的RecordSourceType属性设置为“4—SQL说明”。
    表单设计完成后,运行该表单,输入顺客号:010003,单击“查询”按钳进行查询。

选项

答案【操作步骤】 步骤1:在命令窗口执行命令:CREATE FORM GK,打开表单设计器新建表单。 步骤2:从“表单工具栏”中依次向表单添加两个标签、两个文本框、一个表格控件和两个命令按钮控件。在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值。见表3—12。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“查询”按钮的Click事件代码***** 1 GKH=THISFORM.TEXT1.VALUE 2 THISFORM.GRID1.RECORDSOURCE=" SELECT Order.顾客号,Order.商品号,Comm.商品名,Comm.单价,Order.数量,; 3 Comm.单价*Order.数量as金额; 4 FROM comm INNER JOIN order; 5 ON Comm.商品号=Order.商品号; 6 WHERE Order.顾客号=ALLTRIM(THIS FORM.TEXT1.VALUE); 7 ORDER BY 2; 8 INTO TABLE tjb.dbf” 9 SELECT SUM(金额)FROM TJB INTO ARRAY A 10 THISFORiM.TEXT2.VALUE=A(1) *****“退出”按钮的Click事件代码***** THISFORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮运行表单,在文本框中输入“010003”,单击“查询”命令按钮,然后单击“退出”命令按钮结束。

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

最新回复(0)