一、基本操作题(共4小题,第1和2题是7分、第3和4题是8分)
在考生文件夹下完成如下操作:
1. 新建一个名称为"外汇数据"的数据库。
2. 将自由表rate_exchange和currency_sl添加到数据库中。
3. 通过"外币代码"字段为rate_exchange 和currency_sl 建立永久联系(如果必要请建立相关索引)。
4. 打开表单文件test_form,该表单的界面如下图所示,请将标签"用户名"和"口令"的字体都改为"黑体"。
解答:
1.单击工具栏上的“新建”按扭,选择“数据库”,然后单击“新建文件”。 

3.在数据库设计器中建立关系。分析:
rate_exchange为父表,currency_sl为子表。在rate_exchang中为“外币代码”建立主索引;在currency_sl中“外币代码”建立普通索引。(建立方法同前套题目中索引的建立方法,此处略)
然后将主表中的主索引“外币代码”拖放到子表中的“外币代码”索引处,建立永久关系。
[NextPage]
二、简单应用(2小题,每题20分,计40分)
在考生文件夹下完成如下简单应用:
1. rate_pro.prg中的程序功能是计算出"林诗因"所持有的全部外币相当于
人民币的价值数量,summ中存放的是结果。注意:某种外币相当于人民币数量的计算公式:人民币价值数量= 该种外币的"现钞买入价"* 该种外币"持有数量"。
请在指定位置修改程序的语句,不得增加或删除程序行,请保存所做的修改。
2. 建立一个名为menu_rate的菜单,菜单中有两个菜单项"查询"和"退出"。
"查询"项下中还有一个子菜单,子菜单有"日元"、"欧元"、"美元"三个选项。
在"退出"菜单项下创建过程,该过程负责返回系统菜单。
解答:
1.打开rate_pro.prg文件,内容如下: 

单击工具栏上的“新建”按扭,选择“菜单”,然后单击“新建文件”。在对话框中单击“菜单”。(或用命令crea menu menu_rate)
先设置主菜单,如下:
设置“查询”菜单的结果为“子菜单”,“退出”菜单的结果为“过程”,且过程的代码为:set defa to sysmenu
创建“查询”的子菜单如下:
保存退出,菜单文件名为:menu_rate
[NextPage]
三、综合应用(1小题,计30分)
设计一个文件名和表单名均为myrate的表单,所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为"外汇持有情况"。表单中有一个选项组控件(命名为myOption)和两个命令按钮"统计"(command1)和"退出"(command2)。其中,选项组控件有三个按钮"日元"、"美元"和"欧元"。
运行表单时,首先在选项组控件中选择"日元"、"美元"或"欧元",单击"统计"命令按钮后,根据选项组控件的选择将持有相应外币的人的姓名和持有数量分别存入rate_ry.dbf(日元)或rate_my.dbf(美元)或rate_oy(欧元)中。
单击"退出"按钮时关闭表单。
表单建成后,要求运行表单,并分别统计"日元"、"美元"和"欧元"的持有数量。
解答:
(1)单击工具栏的“新建”按扭,选择“表单”,再单击“新建文件”,启动“表单设计器”。
(2)按照题目要求添加控件,如图:
选中“选项按扭组”,单击右键,选择编辑,然后设置每个选项按扭的caption依次为:日元、美元和欧元。

设置两个命令按扭的caption为:统计和退出。
(3)编写事件代码。
“统计”按扭的click 代码如下:
x=thisform.myoption.value
do case
case x=1
SELECT Currency_sl.姓名, Currency_sl.持有数量;
FROM 外汇数据!rate_exchange INNER JOIN 外汇数据!currency_sl ;
ON Rate_exchange.外币代码 = Currency_sl.外币代码;
WHERE Rate_exchange.外币名称 = "日元";
INTO TABLE rate_ry.dbf
case x=2
SELECT Currency_sl.姓名, Currency_sl.持有数量;
FROM 外汇数据!rate_exchange INNER JOIN 外汇数据!currency_sl ;
ON Rate_exchange.外币代码 = Currency_sl.外币代码;
WHERE Rate_exchange.外币名称 = "美元";
INTO TABLE rate_my.dbf
case x=3
SELECT Currency_sl.姓名, Currency_sl.持有数量;
FROM 外汇数据!rate_exchange INNER JOIN 外汇数据!currency_sl ;
ON Rate_exchange.外币代码 = Currency_sl.外币代码;
WHERE Rate_exchange.外币名称 = "欧元";
INTO TABLE rate_oy.dbf
Endcase
“退出”按扭的click代码:thisform.release
※ 解题技巧:
“统计”按扭的代码可以用“查询设计器”做完,然后查看sql把代码复制过来;每个分支粘贴一次,然后作少量的修改。
附数据表内容和结构如下:
| 广告合作:400-664-0084 全国热线:400-664-0084 Copyright 2010 - 2017 www.my8848.com 珠峰网 粤ICP备15066211号 珠峰网 版权所有 All Rights Reserved
|