三、综合应用题

　　3[简答题]

　　在考生文件夹下完成下列操作。

　　为了查询低价机票，请设计一个表单myform.scx，其界面如下图所示：

　　表单控件名为formone，表单的标题为“机票折扣查询”。表单左侧有1个标签控件Labelone用于显示内容“输入折扣”，1个文本框控件Text1用于输入要查询的折扣，2个命令按钮Commanda和Commandb分别显示“查询”和“退出”，以及一个表格控件Gridone。

　　表单运行时，用户首先在文本框中输入折扣“5”，然后单击“查询”按钮，如果输入正确，在表单右侧以表格形式显示低于此折扣(含)的信息，显示字段包括航班、价格、折扣和当前价格(价格*折扣/10)，按折扣升序排序，折扣相同时按价格升序排序，并将此信息存入t.dbf文件中。单击“退出”按钮将关闭表单。

　　参考解析：【操作步骤】 步骤1：单击工具栏中的“新建”按钮，选择“文件类型”中的“表单”，单击“新建文件”按钮;在表单上添加一个标签，一个文本框，两个命令按钮，一个表格控件。

　　步骤2：在“表单设计器”中单击鼠标右键，在弹出的快捷菜单中选择“数据环境”，将“机票打折”表和“机票价格”表添加到数据环境设计器中。

　　步骤3：通过属性窗口设置表单及各控件的属性。

　　步骤4：选中表格控件，单击鼠标右键，在弹出的快捷菜单中选择“编辑”命令;选中列标题，在属性窗口中，通过Caption属性将表格控件的列标题分别修改为“航班”“价格”“折扣”“当前价格”，结果如图4.15所示。

　　步骤5：双击“查询”按钮，在Click事件中输入以下查询语句。

　　THISFORM.Gridone.RecordSource="SELECT航班，价格，折扣，价格*机票打折.折扣/i0AS当前价格;

　　FROM机票价格，机票打折;

　　WHERE机票价格.序号=机票打折.序号AND折扣<=val(thisform.Text1.value);

　　ORDER BY折扣，价格;

　　INTO TABLE t"

　　然后关闭代码窗口。

　　步骤6：双击“退出”按钮，打开Click事件窗口，

　　在窗口中输入以下语句。

　　Thisform.Release

　　然后关闭代码窗口。

　　步骤6：保存表单为myform.scx。

　　步骤7：运行表单，在文本框中输入“5”，然后单击“查询”按钮，再单击“退出”按钮关闭表单。

　　相关推荐：

　　全国计算机等级考试证书体系(2018版)

　　全国计算机等级考试课程、教材列表(2018版)

　　全国计算机等级证书分几级?哪个级别最高?

　　各地计算机等级考试报名入口及官方网站汇总

　　【考试吧整理】计算机等级考试报考完全指南