2013年9月计算机二级VF考试上机精选题及答案（7）

　　一、基本操作题(共4小题，第1和2题是7分、第3和4题是8分)

　　1. 新建一个名称为"外汇数据"的数据库。

　　2. 将自由表rate_exchange和currency_sl添加到数据库中。

　　3. 通过"外币代码"字段为rate_exchange和currency_sl建立永久联系(如果必要请建立相关索引)。

　　4. 打开表单文件test_form，该表单的界面如下图所示，请将标签"用户名"和"口令"的字体都改为"黑体"。

　　二、简单应用(2小题，每题20分，计40分)

　　1. rate_pro.prg中的程序功能是计算出"林诗因"所持有的全部外币相当于人民币的价值数量，summ中存放的是结果。注意：某种外币相当于人民币数量的计算公式：人民币价值数量 = 该种外币的"现钞买入价"* 该种外币"持有数量"。请在指定位置修改程序的语句，不得增加或删除程序行，请保存所做的修改。

　　2. 建立一个名为menu_rate的菜单，菜单中有两个菜单项"查询"和"退出"。"查询"项下还有子菜单，子菜单有"日元"、"欧元"、"美元"三个选项。在"退出"菜单项下创建过程，该过程负责返回系统菜单。

　　三、综合应用(1小题，计30分)

　　设计一个文件名为myrate的表单，所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为"外汇持有情况"。表单中有一个选项组控件(命名为myOption和两个命令按钮"统计"(command1)和"退出"(command2)。其中，选项组控件有三个按钮"日元"、"美元"和"欧元"。运行表单时，首先在选项组控件中选择"日元"、"美元"或"欧元"，单击"统计"命令按钮后，根据选项组控件的选择将持有相应外币的人的姓名和持有数量分别存入rate_ry.dbf(日元)或rate_my.dbf(美元)或rate_oy(欧元)中。单击"退出"按钮时关闭表单。表单建成后，要求运行表单，并分别统计"日元"、"美元"和"欧元"的持有数量。

　　简单应用题答案：

　　1、 第一处将“find”改为“loca” 注意：loca 只准写四个字符，多写扣7分。

　　2、 第二处将“while not eof()”改为“do while not eof()”

　　3、 第三处将“summ=summ+a[1] * rate_exchange.持有数量”改为“summ=summ+a[1]*currency_sl.持有数量”注意：[ ]不要改( )。

　　综合应用题答案：“统计”命令按钮的CLICK事件代码为：

　　DO CASE

　　CASE thisform.myOption.option1.value=1

　　SELECT 姓名,持有数量 FROM rate_exchange,Currency_sl where rate_exchange.外币代码=Currency_sl.外币代码 and ;

　　外币名称="日元" INTO TABLE rate_ry

　　CASE thisform.myOption.option2.value=1

　　SELECT 姓名,持有数量 FROM rate_exchange,Currency_sl where rate_exchange.外币代码=Currency_sl.外币代码 and ;

　　外币名称="美元" INTO TABLE rate_my

　　CASE thisform.myOption.option3.value=1

　　SELECT 姓名,持有数量 FROM rate_exchange,Currency_sl where rate_exchange.外币代码=Currency_sl.外币代码 and ;

　　外币名称="欧元" INTO TABLE rate_oy

　　ENDCASE

　　“退出”命令按钮的CLICK事件代码为：thisform.release