在考生文件夹下,打开CDB数据库,完成如下综合应用: 在考生文件夹下,打开CDB数据库,完成如下综合应用: 创建一个标题名为“查询”、文件名为TWO的表单,如下图所示。 表单要求如下: 1.为表单建立数据环境,依次向数据环境

admin2017-07-28  56

问题 在考生文件夹下,打开CDB数据库,完成如下综合应用:
    在考生文件夹下,打开CDB数据库,完成如下综合应用:
    创建一个标题名为“查询”、文件名为TWO的表单,如下图所示。
    表单要求如下:
    1.为表单建立数据环境,依次向数据环境添加ORDER、CUST和COMM表。
    2.表单启动后自动居中。

    3.在该表单中设计一个标签、一个文本框、两个表格和两个命令按钮。
    (1)标签标题为“输入顾客号”,文本框用于输入顾客号,两个表格控件用于显示结果。
    (2)命令按钮的功能如下:
    ①“查询”按钮:在该按钮的Click事件中使用SQL的SELECT命令查询顾客号等于输入的“顾客号”的顾客的顾客号、顾客名和地址,以及购买商品的商品号、商品名、单价、数量和金额(各商品记录按商品号升序排序)。
    将查询的顾客信息在表格控件Grid1中显示,同时将结果存储到表TABB中;
    将查询的顾客购买商品的结果在表格控件Grid2中显示,同时将结果存储到表TABC中。
    注意:每件商品的“金额”是由COMM表中该商品的单价木ORDER表中该商品的订购数量计算得到。表TABB和表TABC结构分别如下:
    TABB(顾客号,顾客名,地址)
    TABC(商品号,商品名,单价,数量,金额)
    ②“退出”按钮:其功能是关闭和释放表单。
    注意:表格控件的RecordSourceType属性设置为“4-SQL说明”。
    表单设计完成后,运行该表单,查询顾客号等于“010003”的顾客信息和购买的商品信息。

选项

答案【操作步骤】 步骤1:新建表单,保存表单文件名为TWO。 步骤2:修改表单的Caption属性为“查询”,AutoCenter为.T.。 步骤3:在表单中单击右键,选择“数据环境”,依次添加表ORDER、CUST和COMM。 步骤4:按题中图示添加一个标签、一个文本框和两个表格及两个命令按钮,并设置标签及两个命令按钮的Caption属性值,两个表格的RecordSource-Type属性为4-SQL说明。 步骤5:在查询按钮的单击事件中输入下列程序代码: SELECT cust.顾客号,顾客名,地址,order.商品号,商品名,单价,数量,单价*数量AS金额FROM comm,cust,order; WHERE comm.商品号=order.商品号AND cust.顾客号=order.顾客号AND cust.顾客号=THISFORM.TEXT1.VALUE; INTO CURSOR LSB SELECT DIST顾客号,顾客名,地址FROM LSBINTO DBF TABB SELECT商品号,商品名,单价,数量,金额FROM LSB INTO DBF TABC THISFORM.GRID1.RECORDSOURCE="SELE*FROM TABB INTO CURSOR A" THISFORM.GRID2.RECORDSOURCE="SELE*FROM TABC INTO CURSOR b” 步骤6:在退出按钮的单击事件中输入: THISFORM.RELEASE 步骤7:按题目要求输入顾客号:010003,运行并保存程序。

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

最新回复(0)