环球网校是美国纳斯达克上市企业欢聚时代(NASDAQ:YY)旗下品牌 | 住房和城乡建设部 建筑人才培训合作单位
您现在的位置在: > 计算机类 > 计算机等级考试 > 模拟试题 >

计算机等级考试二级VisualFoxPro上机试题及解题思路第二套题30

2010-09-20 来源:互联网 作者:第一考试网

计算机等级考试二级VisualFoxPro上机试题及解题思路第二套题30

#

第一考试网整理了计算机等级考试二级VisualFoxPro上机试题及解题思路第二套题 #

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

#

在考生文件夹下完成如下简单应用: #

1. 编写程序three.prg完成下列操作:根据"外汇汇率"表中的数据产生rate #

表中的数据。 #

要求:将所有"外汇汇率"表中的数据插入rate表中并且顺序不变,由于

#

"外汇汇率"中的币种1和币种2存放的是外币名称,而rate表中的币种1代码和币种

#

2代码应该存放外币代码,所以插入时要做相应的改动,外币名称与外币代码的对

#

应关系存储在"外汇代码"表中。 #

注意:程序必须执行一次,保证rate表中有正确的结果。

#

2. 使用查询设计器建立一个查询文件four.qpr。查询要求:外汇帐户中有

#

多少日元和欧元。查询结果包括了外币名称、钞汇标志、金额,结果按外币名 #

称升序排序,在外币名称相同的情况下按金额降序排序,并将查询结果存储于 #

表five.dbf 中。

#

第1题:本题的考查点是利用SQL_SELECT语句建立查询程序。第一步:在Visual FoxPro主窗口中按下组合键Ctrl+N,系统弹出"新建"对话框,在文件类型中选择"程序",点击"新建文件"按钮; #

第二步:在弹出的代码编辑器窗口中输入以下代码:

#

SELECT 外汇代码.外币代码 AS 币种1代码,; #

外汇代码_a.外币代码 AS 币种2代码, 外汇汇率.买入价, 外汇汇率.卖出价; #

FROM 外汇!外汇代码 INNER JOIN 外汇!外汇汇率; #

INNER JOIN 外汇!外汇代码外汇代码_a ;

#

ON 外汇汇率.币种2 = 外汇代码_a.外币名称 ;

#

ON 外汇代码.外币名称 = 外汇汇率.币种1;

#

INTO TABLE rate.dbf

#

第2题:本题的考查点是利用查询设计器建立查询。 #

建立查询可以使用"文件"菜单完成,选择文件--新建--查询--新建文件,将"外汇代码"和"外汇账户"表加入查询中,从字段中选择字段外汇代码.外币名称、外汇账户.钞汇标志和外汇账户.金额;切换到筛选中输入条件: #

外币代码外币名称 = "日元" OR #

外币代码外币名称 = "欧元";

#

切换到"排序依据"中选择"外汇代码.外币名称"字段按升序排序和"外汇账户.金额"字段按降序排序。单击查询菜单下的查询去向,选择表,输入表名five.dbf,最后运行该查询。

#

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

#

设计一个文件名和表单名均为myaccount的表单。表单的标题为 #

"外汇持有情况"。表单中有一个选项按钮组控件(myOption)、一个表格控件 #

(Grid1)以及两个命令按钮"查询"(Command1)和"退出"(Command2)。其中,选项

#

按钮组控件有两个按钮"现汇"(Option1)、"现钞"(Option2)。

#

运行表单时,首先在选项组控件中选择"现钞"或"现汇",单击"查询"命令

#

按钮后,根据选项组控件的选择将"外汇账户"表的"现钞"或"现汇"(根据钞汇标

#

志字段确定)的情况显示在表格控件中。

#

单击"退出"按钮,关闭并释放表单。 #

注:在表单设计器中将表格控件Grid1的数据源类型设置为"SQL说明"。 #

本题主要考核点

#

控件的属性的修改、SQL语句运用、表单的退出等知识#

本题解题思路: #

第一步:在Visual FoxPro主窗口中按下组合键Ctrl+N,系统弹出"新建"对话框,在文件类型中选择"表单",点击"新建文件"按钮(系统将打开表单设计器);或直接在命令窗口中输入 crea form myrate。

#

第二步:点击工具栏按钮"表单控件工具栏",在弹出的"表单控件"对话框中,选中"选项组"控件,在表单设计器中拖动鼠标,这样在表单上得到一个"选项组"控件optiongroup1,用类似的方法为表单再加入两个"命令按钮"控件command1和command2。

#

相关控件的属性值如下:

#

对象 属性 属性值 #

Form1 Caption 外汇持有情况

#

选项组 Name myOption #

ButtonCount 2

#

MyOption.option1 Caption 现汇 #

MyOption.option2 Caption 现钞

#

Command1 Caption 查询

#

Command2 Caption 退出 #

***********命令按钮command1(查询)的Click事件代码如下************

#

DO CASE #

CASE THISFORM.myOption.VALUE=1 #

THISFORM.GRID1.RECORDSOURCE="SELECT 外币代码, 金额;

#

FROM 外汇账户;

#

WHERE 钞汇标志 = [现汇]; #

INTO CURSOR TEMP"

#

CASE THISFORM.myOption.VALUE=2

#

THISFORM.GRID1.RECORDSOURCE="SELECT 外币代码, 金额;

#

FROM 外汇账户; #

WHERE 钞汇标志 = [现钞];

#

INTO CURSOR TEMP"

#

ENDCASE #

***********命令按钮command2(退出)的Click事件代码如下************

#

thisform.release #

责编: 返回顶部  打印

关于我们联系我们友情链接网站声明网站地图广告服务帮助中心