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

admin2017-07-28  39

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

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

选项

答案【操作步骤】 步骤1:单击“打开”按钮,在“打开”对话框中选择考生文件夹下的CDB数据库。 步骤2:单击“新建”按钮,在打开的“新建”对话框中选择“表单”选项,再单击“新建文件”按钮。 步骤3:在表单上添加各控件、文本框、表格、命令按钮,并进行适当的布置和大小调整。 步骤4:根据题目要求设置各标签、表格、命令按钮以及表单的属性值。 步骤5:将表格Grid1的RecordSourceType属性值设置为“4-SQL说明”。 步骤6:设置“查询”按钮的Click事件代码: ThisForm.Grid1.RecordSource=”SELECT Order.顾客号,Comm.商品号,商品名,单价,数量,Comm.单价*Order.数量as金额FROM cdb! comm INNERJOIN cdb! order ON Comm.商品号=Order.商品号WHERE 顾客号=ALLTRIM(ThisForm.Text1.Value)order by Comm.商品号INTO TABLE tjb” SELECT sum(Comm.单价*Order.数量)FROM cdb! comm INNER JOIN cdb! order ON Comm.商品号=Order.商品号WHERE顾客号=ALLTRIM(ThisForm.Text1.Value) INTOARRAY temp ThisForm.Text2.Value=temp 步骤7:设置“退出”按钮的Click事件代码: Release ThiSForm 步骤8:保存表单为GK并运行,在“顾客号”文本框输入“010003”,单击“查询”按钮进行计算。最后,单击“退出”按钮结束。

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

最新回复(0)