【正确答案】正确答案:【操作步骤】 步骤1:新建表单,保存表单文件名为TWO。 步骤2:修改表单的Caption属性为"查询",AutoCenter为.T.。 步骤3:在表单中单击右键,选择"数据环境",依次添加表ORDER、CUST和COMM。 步骤4:按题中图示添加一个标签、一个文本框和两个表格及两个命令按钮,并设置标签及两个命令按钮的Caption属性值,两个表格的RecordSourceType属性为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 LSB INTO 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,运行并保存程序。
【答案解析】