三、綜合應用(1小題，計30分)

　　在考生文件夾下，先打開"賓館"數據庫，然后創建一個文件名為test的表單，如圖所示。

　　該表單完成如下綜合應用：

　　在該表單中設計一個標簽(Label1)、一個文本框(Text1)和兩個命令按鈕。

　　標簽的標題文本為"退房日期大于或等于"。

　　文本框用于輸入退房日期。

　　兩個命令按鈕的功能如下：

　　⑴ "查詢"按鈕(Command1)：在該按鈕的Click事件中使用SQL的SELECT命令查詢退房日期大于或等于輸入日期的客戶號、身份證、姓名、工作單位和該客戶入住的客房號、類型名、價格信息，查詢結果按價格降序排序，并將查詢結果存儲到表TABD中。表TABD的字段為客戶號、身份證、姓名、工作單位、客房號、類型名、價格。

　　⑵ "退出"按鈕(Command2)的功能是"關閉和釋放表單"。

　　表單設計完成后，運行該表單，查詢退房日期大于或等于2005-04-01的顧客信息。

　　本題的主要考核點是表單的創建、表單控件的添加、表單控件屬性的設置以及控件代碼等。

　　1.利用"文件"菜單下的"新建"命令可創建新的表單文件，在"顯示"菜單中打開表單控件工具欄，通過表單控件工具欄向表單中添加各控件。

　　2.通過屬性窗口設置表單及相關各控件的屬性，表單及相關各控件的屬性值如下：

　　對象 屬性名 值

　　Lable1 Caption 退房日期大于或等于

　　Command1 Caption 查詢

　　Command2 Caption 退出

　　3.為"查詢"命令按鈕的Click事件編寫程序代碼：

　　SELECT 客戶.客戶號, 客戶.身份證, 客戶.姓名, 客戶.工作單位, 客房.客房號,;

　　房價.類型名, 房價.價格;

　　FROM 賓館!客戶,賓館!房價,賓館!入住,賓館!客房 ;

　　WHERE 客戶.客戶號 = 入住.客戶號 ;

　　AND 客房.客房號 = 入住.客房號 ;

　　AND 房價.類型號 = 客房.類型號;

　　AND 入住.退房日期>=ctod(thisform.text1.text);

　　ORDER BY 房價.價格 DESC;

　　INTO TABLE tabd.dbf

　　4.為"退出"命令按鈕的Click事件編寫程序代碼：THISFORM.RELEASE

　　5.最后以test為文件名將表單保存在考生文件夾下，并運行該表單。