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

admin2014-11-30  25

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

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

选项

答案步骤1:命令窗口执行:CREATE FORM test,打开表单设计器新建表单。从“表单控件”工具样中依次向表单添加一个标签、一个文本框和两个命令按钮。 步骤2:在“属性”面板的下拉框中选择农单对象,在“全部”选项k中修改对象属性值,见表4-18。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“查询”按钮的Click事件代码***** 1 dd=Alltrim(ThisF0rm.Textl.Value) 2 SELECT客户.客户号,客户.身份证,客 户.姓名,客户.工作单位,入住.客房号, 房价.类型名,房价.价格; 3 FROM 客户INNER JOIN入住; 4 INNER JOIN客房; 5 INNER JOIN房价; 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,单击“查询”按钮。最后将表单文件保存到考生文件夹下。

解析 本题主要考查了表单及控件的常用属性和方法的设置;SQL超联接查询。
    对于SQL不熟悉的考生,可借助查询设计器完成本题的SQL查询,需要注意的是,在设置筛选条件时,由于文本框中显示的是字符型数据,而“退房日期”是日期型数据,因此,要将文本框的数据类型通过CTOD()函数转换成日期型函数,通过VALUE属性可以获得丈本框中的数据。
转载请注明原文地址:https://jikaoti.com/ti/BZv0FFFM
0

最新回复(0)