操作题9

一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
在考生文件夹下完成如下操作：
1. 用SQL语句从rate_exchange.dbf表中提取外币名称、现钞买入价和卖出价三个字段的值并将结果存入rate_ex.dbf表（字段顺序为外币名称、现钞买入价、卖出价，字段类型和宽度与原表相同，记录顺序与原表相同），并将相应的SQL语句保存为文本文件one.txt。
2. 用SQL语句将rate_exchange.dbf表中外币名称为"美元"的卖出价修改为829.01，并将相应的SQL语句保存为文本文件two.txt。
3. 利用报表向导根据rate_exchange.dbf表生成一个外币汇率报表，报表按顺序包含外币名称、现钞买入价和卖出价三列数据，报表的标题为"外币汇率"（其他使用默认设置），生成的报表文件保存为rate_exchange。
4. 打开生成的报表文件rate_exchange进行修改，使显示在标题区域的日期改在每页的注脚区显示。
本题主要考核点：
SQL查询语句，查询去向，统计，利用报表向导建立报表等
本题解题思路：
第1题：select 外币名称,现钞买入价,卖出价 from rate_exchange into table rate_ex。
第2题：update rate_exchange set 卖出价=829.01 where 外币名称="美元"。
第3题：本题的主要考核点是使用报表向导制作报表。
启动报表向导可在"文件"菜单中选择"新建"或者单击工具栏上的"新建"按钮，打开"新建"对话框，文件类型选择报表，单击向导按钮。或者在"工具"菜单中选择"向导"子菜单，选择"报表"，或直接单击工具栏上的"报表向导"图标按钮。
第4题：双击生成的报表文件rate_exchange，在报表设计器中，将显示在"标题" 区域的日期拖到"页注脚"区，保存报表文件即可。
二、简单应用（2小题，每题20分，计40分）
1. 设计一个如下图所示的时钟应用程序，具体描述如下：

表单名和表单文件名均为timer，表单标题为"时钟"，表单运行时自动显示系统的当前时间；
1) 显示时间的为标签控件label1（要求在表单中居中，标签文本对齐方式为居中）；
2) 单击"暂停"命令按钮（Command1）时，时钟停止；
3) 单击"继续"命令按钮（Command2）时，时钟继续显示系统的当前时间；
4) 单击"退出"命令按钮（Command3）时，关闭表单。
提示：使用计时器控件，将该控件的interval属性设置为500，即每500毫秒触发一次计时器控件的timer事件（显示一次系统时间）；将计时器控件的interval属性设置为0将停止触发timer事件；在设计表单时将timer控件的interval属性设置为500。
2. 使用查询设计器设计一个查询，要求如下：
1) 基于自由表currency_sl.DBF和rate_exchange.DBF；
2) 按顺序含有字段"姓名"、"外币名称"、"持有

数量"、"现钞买入价"及表达式"现钞买入价*持有数量"；
3) 先按"姓名"升序排序、再按"持有数量"降序排序；
4) 查询去向为表results.dbf；
5) 完成设计后将查询保存为query文件，并运行该查询。
本题主要考核点：
简单应用程序的建立，使用查询设计器设计查询等
本题解题思路：
第1题：本题的主要考核点是简单应用程序的建立。
可以用三种方法建立表单：调用表单设计器；在项目管理器环境下调用；单击"文件"菜单中的"新建"，打开"新建"对话框，选择"表单"；在命令窗口输入"CREATE FORM 时钟"命令。
打开表单设计器后，将表单的Name属性改为：timer；在表单控件工具栏上单击"命令按钮"，在表单上放置三个按钮控件，分别修改其Caption属性为"暂停"，"继续"，"退出"；单击"标签控件"，在表单中央放置一个标签控件，修改其Alignment属性为"2-中央"；单击"计时器控件"，在表单上放置一个计时器控件，修改其interval属性为500。
相关代码如下：
command1(暂停)按钮的click事件为thisform.timer1.interval=0
command2(继续)按钮的click事件为thisform.timer1.interval=500
command3(退出)按钮的click事件为thisform.release
timer1的timer事件为bel1.caption=time()
第2题：本题的主要考核点是运用查询设计器建立查询。
建立查询可以使用"文件"菜单完成，选择文件--新建--查询--新建文件，将"currency_sl"表和"rate_exchange"表添加入查询中，从字段选项卡中依次选择"姓名"、"外币名称"、"持有数量"、"现钞买入价"及表达式"现钞买入价*持有数量"；切换到"排序依据"选项卡并在其中选择字段"姓名"，用相同方法设置按"持有数量"降序排序；单击查询菜单下的"查询去向"，在"选择表"对话框中输入表名results，最后运行该查询。
三、综合应用（1小题，计30分）
设计一个满足如下要求的应用程序，所有控件的属性必须在表单设计器的属性窗口中设置：
1. 建立一个表单，表单文件名和表单名均为form1，表单标题为"外汇"；
2. 表单中含有一个页框控件（PageFrame1）和一个"退出"命令按钮（Command1）；
3. 页框控件（PageFrame1）中含有三个页面，每个页面都通过一个表格控件显示有关信息：
1) 第一个页面Page1上的标题为"持有人"，其上的表格控件名为grdCurrency_sl，记录源的类型（RecordSourceType）为"表"，显示自由表currency_sl中的内容；
2) 第二个页面Page2上的标题为"外汇汇率"，其上的表格控件名为grdRate_exchange，记录源的类型（RecordSourceType）为"表"，显示自由表rate_exchange中的内容；
3) 第三个页面Page3上的标题为"持有量及价值"，其上的表格控件名为Grid1，记录源的类型（RecordSourceTyp

e）为"查询"，记录源（RecordSource）为"简单应用"题目中建立的查询文件query。
4. 单击"退出"命令按钮（Command1）关闭表单。
注意：完成表单设计后要运行表单的所有功能。
本题主要考核点：
控件的属性的修改（页框，表格）、表单的退出等知识点
本题解题思路：
第一步：在Visual FoxPro主窗口中按下组合键Ctrl+N，系统弹出"新建"对话框，在文件类型中选择"表单"，点击"新建文件"按钮，系统将打开表单设计器；或直接在命令窗口中输入：crea form form1。
第二步：点击工具栏按钮"表单控件工具栏"，在弹出的"表单控件"对话框中，选中"页框"控件，在表单设计器中拖动鼠标，这样在表单上得到一个"页框"控件PageFrame1，用类似的方法为表单再加入三个"表格"控件(右击页框，点击编辑按钮)，1个"命令按钮"控件command1；
相关控件的属性值如下表所示：
对象 属性 属性值
Form1 Caption 外汇
PageFrame1 pagecount 3
PageFrame1.page1 Caption 持有人
PageFrame1.page2 Caption 外汇汇率
PageFrame1.page3 Caption 持有量及价值
PageFrame1.page1.grid1 Name grdCurrency_sl
PageFrame1.page2.grid1 Name grdRate_exchange
PageFrame1.page1.grdCurrency_sl RecordSourceType 0-表
PageFrame1.page1.grdCurrency_sl RecordSource currency_sl
PageFrame1.page2.grdRate_exchange RecordSourceType 0-表
PageFrame1.page2.grdRate_exchange RecordSource rate_exchange
PageFrame1.page3.grid1 RecordSourceType 3-查询
PageFrame1.page3.grid1 RecordSource query
Command1 Caption 退出
******命令按钮command1(退出)的Click事件代码如下******
thisform.release