在考生文件夹下,先打开“宾馆”数据库,然后创建一个文件名为test的表单,如图2—15所示。 该表单完成如下综合应用: 在该表单中设计一个标签(Labell)、一个文本框(Text1)和两个命令按钮。 标签的标题文本为“退房日期大

admin2016-12-05  30

问题 在考生文件夹下,先打开“宾馆”数据库,然后创建一个文件名为test的表单,如图2—15所示。

    该表单完成如下综合应用:
    在该表单中设计一个标签(Labell)、一个文本框(Text1)和两个命令按钮。
    标签的标题文本为“退房日期大于或等于”。文本框用于输入退房日期。两个命令按钮的功能如下:
    ①“查询”按钮(Command1):在该按钮的Click事件中使用SOL的SELECT命令查询退房日期大于或等于输入日期的“客户号”、“身份证”、“姓名”、“工作单位”和该客户入住的“客房号”、“类型名”、“价格信息”,查询结果按“价格”降序排序,并将查询结果存储到表tabd中。表tabd的字段为“客户号”、“身份证”、“姓名”、“工作单位”、“客房号”、“类型名”和“价格”。
    ②“退出”按钮(Command2)的功能是“关闭和释放表单”。
    表单设计完成后,运行该表单,查询退房日期大于或等于2005—04—01的顾客信息。

选项

答案【操作步骤】 步骤1:命令窗口执行:CREATE FORM test,打开表单设计器新建表单。从“表单控件”工具栏中依次向表单添加一个标签、一个文本框和两个命令按钮。 步骤2:在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值,见表3—15。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“查询”按钮的Click事件代码***** 1 dd=Alltrim(ThisForm.Text1.Value) 2 SELECT客户.客户号,客户.身份证,客户.姓名,客户.工作单位,入住.客房号,房价.类型名,房价.价格; 3 FROM 客户 INNER JOIN 入住; 4 INNER JOIN客房; 5 INNER JOlN 房价; 6 ON 房价.类型号=客房.类型号; 7 ON 客房.客房号=入住.客房号; 8 ON 客户.客户号=入住.客户号; 9 WHERE入住.退房日期>=CTOD(dd); 10 ORDER BY 房价.价格 DESC; 11 INTO TABLE tabd.dbf*****“退出”按钮的Click事件代码***** THISFORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮,在文本框中输入日期:2005-04-01,单击“查询”按钮。最后将表单文件保存到考生文件夹下。

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

最新回复(0)