建立满足如下要求的应用并运行,所有控件的属性必须在表单设计器的属性窗口中设置。 (1)建立:一个文件名和表单名均为“myform”的表单文件,其中包含两个表格控件,第一个表格控件名称是“9rdl”。用于显示表“customer”中的记录,第二个表格控件名称是“grd2”,用于显示与表“customer”中当前记录对应的“0rder”表中的记录。要求两个表格尺寸相同、左右布局、顶边对齐。 (2)建立一个菜单“mymenu”。该菜单只有一个“退出”菜单项,该菜单项列‘应于一个过程,其中含有两条语句,第一条语句是关闭表单“myform”,第二条语句是将菜单恢复为默认的系统荣单。 (3)在表单“myform”的Load事件中执行生成的菜单程序“mymenu.mpr”。 注意:程序完成后要运行所有功能。
第1题:
在考生文件夹下,打开ecommerce数据库,完成如下综合应用(所有控件的属性必须在表单设计器的属性窗口中设置):
设计一个文件名和表单名均为myform的表单,表单标题为“客户基本信息”。要求该表单上有“女客户信息”(Command1)、 “客户购买商品情况”(Command2)、 “输出客户信息”(Command3)和“退出”(Command4)4个命令按钮。
各命令按钮功能如下:
①单击“女客户信息”按钮,使用SQL的SELECT命令查询客户表customer中女客户的全部信息。
②单击“客户购买商品情况”按钮,使用SQL的SELECT命令查询简单应用中创建的sb—view视图中的全部信息。
③单击“输出客户信息”按钮,调用简单应用中设计的报表文件myreport在屏幕上预览(PREVIEW)客户信息。
④单击“退出”按钮,关闭表单。
第2题:
(1)设计时钟应用程序,具体描述如下:
表单名和表单文件名均为“timer”,表单标题为“时钟”,表单运行时自动显示系统的当前时间。
①单击“暂停”命令按钮,时钟停止;
②单击“继续”命令按钮时,时钟继续显示系统的当前时间;
③单击“关闭”命令按钮时,关闭表单。
提示:使用计时器控件,将该控件的Interval属性设置为1000,即每1000毫秒触发一次计时器控件的Timer事件(显示一次系统时间);将计时器控件的Interval属性设置为“o”将停止触发Timer事件;在设计表单时将Timer控件的Interval属性设置为1000。
(2)使用查询设计器设计一个查询“qryl”,要求如下:
基于自由表“货币代码”和“外汇账户”,查询含有字段“账户”、“货币名称”、“数量”、“买入价”及表达式“买入价* 数量”,先按“账户”升序排序,再按“数量”降序排序,查询去向为表“result.dbf”,完成设计后将查询保存,并运行该查询。
【考点指引】本大题第1小题考查了Timer控件的使用,重点是Interval属性的设置。第2小题考查了查询的创建和使用。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“时钟”,将Name属性值修改为“Timer”,单击表单控件工具栏上的“标签”控件图标,为表单添加一个标签Label1;单击表单控件工具栏上的“命令按钮”控件图标,为表单添加3个命令按钮Command1、Command2和Command3;单击表单控件工具栏上的“计时器”控件图标,为表单添加一个计时器Timer1。
②分别选择3个命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“暂停”,将命令按钮Command2的Caption属性值修改为“继续”,将命令按钮Command3的Caption属性值修改为“关闭”,如图58–1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
③选择计时器Timer1,在计时器属性窗口中将“Interval”属性值修改为“1000”,双击“Timer Event”,打开Timer事件代码编辑窗口,输入代码:ThisForm.Label1.Caption=TIME()
④双击“暂停”命令按钮,在Click事件中输入代码:ThisForm.Timer1.interval=0
⑤双击“继续”命令按钮,在Click事件中输入代码:ThisForm.Timer1.interval=1000
⑥选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“timer”,保存在考生文件夹下,然后运行表单。
(2)【操作步骤】
①选择【文件】→【新建】命令,选择“查询”,单击“新建文件”按钮,在“打开”对话框中选择表“货币代码”,单击“确定”按钮,将表“货币代码”添加到查询设计器中。
②在“添加表或视图”对话框中单击“其他”按钮,在“打开”对话框中选择表“外汇账户”,单击“确定”按钮,将表“外汇账户”添加到查询设计器中,这时系统会自动为这两个表建立内部联接,联接字段为两个表的“货币代码”字段,单击“确定”按钮关闭“连接条件”对话框,再单击“关闭”按钮关闭“添加表或视图”对话框。
③在查询设计器中的“字段”选项卡下分别将字段“账户”、“货币名称”、“数量”、“买入价”添加到“选定字段”列表框中;在“函数和表达式”下的文本框中输入“买入价*数量”并添加到“选定字段”列表框中。
④单击“排序依据”选项卡,将“选定字段”列表框中的“账户”添加到“排序条件”列表框中,“排序选项”选择“升序”;再将“选定字段”列表框中的“数量”添加到“排序条件”列表框中,“排序选项”选择“降序”。
⑤最后选择【查询】→【查询去向】命令,打开“查询去向”对话框,在对话框中选择“表”,在“表名”文本框中输入用来保存查询结果的数据表文件名“result”。
⑥关闭查询设计器并保存查询为“qry1”。
⑦在命令窗口中输入命令:DO qry1.qpr(回车执行查询)。
第3题:
设计一个文件名和表单名均为currency_form的表单,所有控件的属性必须在表单设计器的属性窗口中设置完成。表单的标题为“外币市值情况”。表单中有一个“姓名”标签控件Labell、一个文本框控件Textl、一个表格控件Gridl和两个命令按钮“查询”(Commandl)和“退出”(Command2),如下图所示。运行表单时,在文本框Text1中输入姓名,然后单击“查询”命令按钮,则在表格控件Grid1中会显示出他所持有的全部“外币名称”及对应的“人民币数量”,并按人民币数量降序排序,同时将结果存储到自由表 DBFA中。 注意,某种外币相当于人民币数量的计算公式:人民币数量=该种外币的“现钞买人价”*该种外币的“持有数量”。 单击“退出”按钮时关闭并释放表单。 运行该表单,查询“林诗因”持有的外币的市值情况。
第4题:
在考生文件夹下,打开“学生管理”数据库,完成如下综合应用(所有控件的属性必须在表单设计器的属性窗口中设置):
设计一个名称为myf的表单,表单的标题为“学生住宿信息”。表单上设计1个包含3个选项卡的“页框”和1个“关闭”命令按钮。
要求如下:
①为表单建立数据环境,按顺序向数据环境添加“宿舍”表和“学生”表。
②按从左至右的顺序3个选项卡的标签(标题)的名称分别为“宿舍”、“学生”和“住宿信息”,每个选项卡上均有一个表格控件,分别显示对应表的内容,其中住宿信息选项卡显示如下信息:学生表里所有学生的信息,加上所住宿舍的电话(不包括年龄信息)。
③单击“关闭”按钮关闭表单。
第5题:
在考生文件夹下完成如下综合应用:
设计一个表单“bdl”,表单标题名为“部门年度数据查询”,要求如下:
(1)为表单建立数据环境,向数据环境添加部门销售表。
(2)当在“年度”标签微调控件中选择年度并单击“查询”按钮,则会在下面的表格控件内显示该年度各部门的“销售额”和“利润”。指定微调控件上箭头按钮(Spinner—HighValue属性)与下箭头按钮(SpinnerLowValue属性)值分别为“2008”和“2003”,缺省值(Value属性)为“2007”,增量(Increment属性)为“1”。
(3)单击“关闭”按钮,关闭表单。
【考点指引】本大题主要考查表单的设计,重点是微调控件和表格控件的使用。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“部门年度数据查询”,单击表单控件工具栏上的“标签”控件图标,为表单添加一个标签Label1,单击表单控件工具栏上的“微调控件”控件图标,为表单添加一个微调控件Spinner1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Com–mand2,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件Grid1。
②选择标签Label1,在标签属性窗口中将标签Label1的Caption属性值修改为“年度”。
③选择微调控件Spinner1,在微调控件属性窗口中将SpinnerHighValue属性值修改为“2008”,将Spinner–LowValue属性值修改为“2003”,将Value属性值修改为“2007”。
④分别选择两个命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”,Command2的Caption属性值修改为“关闭”,如图29–1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
⑤在表单设计器中,用鼠标右键单击表单空白处,在弹出的快捷菜单中选择【数据环境】命令,打开表单的数据环境,选择数据表文件“部门销售”添加到数据环境中。
⑥选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“〝″”,将“RecordSourceType”属性值修改为“1”。
⑦双击“查询”命令按钮,在Click事件中输入代码:
SELECT*INTO CURSOR tmp FROM部门销售WHERE年度=ALLTRIM(STR(INT(ThisForm.Spin–ner1.Value)))
ThisForm.Grid1.RecordSourceType=1
ThisForm.Grid1.RecordSource=〝trap″
ThisForm.Grid1.Refresh
⑧选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd1”,保存在考生文件夹下,然后运行表单。