【正确答案】步骤1:通过“新建”对话框新建一个表单,文件名为myform,并向其中添加一个标签控件、一个文本框控件和两个命令按钮控件。
步骤2:设置表单的Name属性为myform,Caption属性为“综合应用”;设置命令按钮1的Caption属性为“查询(/<R)”,命令按钮2的Caption属性为“退出”;标签的Caption属性为“日期”;文本框的Value属性为“=date()”。
步骤3:在“查询”命令按钮的Click事件中输入如下代码:
******“查询”按钮的Click事件代码******
SELECT Customer.会员号, Customer.姓名,;
(Orderitem.数量*Aarticle.单价)AS总金额;
FROM article,orderitem,customer;
WHERE Orderitem.会员号=Customer.会员号;
AND Article.商品号=Orderitem.商品号;
AND Orderitem.日期>=ThisForm.Text1.Value;
ORDER BY 3;
INTO TABLE dbfa.dbf
************************************
在“关闭”命令按钮的Click事件中输入如下代码。
ThisForm.Release
步骤4:保存并运行表单,在文本框中输入题目要求的日期后查询。
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@