1、2012 春江苏省计算机二级 VFP 上机真题 1 及答案解析(总分：100.00，做题时间：70 分钟)一、(本试卷完成时间为 70 分钟)(总题数：1，分数：0.00)1.项目、数据库和表操作(12 分) 打开 T 盘根目录中的项目文件 JXGL,在该项目中已有一数据库 JXSJ。 1.在JXSJ 数据库中按下表所示的结构创建 AB.DBF 表,并按表格中的要求设置相关属性。 (1)设置表的注释:世博会期间上海旅馆入住率统计表; (2)设置 XJ 字段的默认值:三星; (3)设置 LGMC 字段的显示类:下拉列表框; (4)设置 RZL 字段的有效性规则:大于等于 0 且小于等于 100;
2、 (5)创建索引名为 ABCD 的普通索引,要求按日期排序,日期相同时按入住率排序 2.在 AB 表中输入如下记录: （分数：20.00）_2.设计查询(8 分) 已知课程安排表(KCAP.DBF)存储了每个学期各班级所上的课程信息,其中含学期编码(XQBM,C)、班级编号(BJBH,c)等字段;课程表(KC.DBF)存储了每门课程的信息,其中含课程代码(KCDM,C),学分(XF,N)等字段,按如下要求修改 JXGL 项目中的查询 CHAXUN: 基于 KCAP 表和 KC 表,查询每学年(由XQBM 字段的前 13 个字节内容指定),每个班级的课程门数和总学分。要求输出字段依次为学年、BJ
3、BH、课程门数、总学分,查询结果按学年排序,输出去向为临时表(表名为 ABCD)。（分数：20.00）_3.设计菜单 JXGL 项目中已存在菜单 MENU,其中已定义了“文件“菜单栏及其中的“退出菜单“项。按如下要求设计菜单,完成后的运行效果如图 1 所示。 1.将“文件“菜单栏修改为“文件管理“,并设置其访问键“F“。 2.在“文件管理“菜单栏中添加菜单项“新建“、“打开“、“关闭“(其中“新建“、“打开“为系统菜单项),并在“打开“与“关闭“、“关闭“与“退出菜单“之间设置分组线。 3.为“关闭“菜单项创建子菜单“数据库“、“表“。 4.为“表“菜单项设置“跳过“条件,使该菜单项不可用。
4、5.为“数据库“菜单项设置命令,命令的功能是关闭所有已打开的数据库。（分数：20.00）_4.设计表单(10 分) 表单 FRM12E 用于文字缩放演示。按下列要求修改表单,修改后的表单运行时如图 2 所示。 1.设置表单的标题为“文字缩放“。 2.添加标签对象 Label1,并设置相关属性:标题为“等级考试“,且能根据标题内容自动调节大小。 3.添加两个命令按钮,并按图 2 所示设置标题为“缩小“和“放大“,同时设置“缩小“命令按钮的有关属性使其不可使用 4.为“放大“命令按钮编写 Click 事件代码:调用表单的方法XXX(已创建)。 5.将表单的 XXX 方法程序代码,复制到“缩小“命令
5、按钮的 Click 事件代码中,修改程序代码的前 3 行,实现: (1)“缩小“命令按钮不可使用,“放大“命令按钮可使用; (2)标签对象标题逐渐缩小显示。（分数：20.00）_5.程序改错(5 分) 下列程序中 PrintPrime 过程的功能是查找所有小于自然数 nMax 的素数,并按每行 nCol个素数显示在主窗口中。素数是大于 1 且只能被 1 和自身整除的整数,如 2、3、5、7 等。判断一个自然数N 是否是素数的方法是:用 N 除以从 2 到大于 N 的最小整数之间的每一个整数 j,若所有的 j 都不能整除 N,则 N 为素数。要求: 1.项目中有一个程序文件 Pcode,将 T
6、盘中 VFP01.TXT 中的程序代码复制到其中并进行修改。 2.在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。 1 CLEAR 2 DO PrintPrime(400,5) 3 PROCEDURE PrintPrime 4 PARA nMax,nCol 5 i=0 (2)设置 XJ 字段的默认值:三星; (3)设置 LGMC 字段的显示类:下拉列表框; (4)设置 RZL 字段的有效性规则:大于等于 0 且小于等于 100; (5)创建索引名为 ABCD 的普通索引,要求按日期排序,日期相同时按入住率排序 2.在 AB 表中输入如下记录: （分数：20.00）_正确
7、答案：(LGMC 字段的显示类:Listbox RZL 字段的有效性规则:BETWEEN(RZL,0,100) ABCD 索引表达式:DTOC(RQ,1)+STR(RZL,6,2) UPDATE JYB SET FK=IIF(LX=X,0.1,0.2)*IIF(HSRQ-JYRQ30,HSRQ-JYRQ-30,0)解析：2.设计查询(8 分) 已知课程安排表(KCAP.DBF)存储了每个学期各班级所上的课程信息,其中含学期编码(XQBM,C)、班级编号(BJBH,c)等字段;课程表(KC.DBF)存储了每门课程的信息,其中含课程代码(KCDM,C),学分(XF,N)等字段,按如下要求修改 JX
8、GL 项目中的查询 CHAXUN: 基于 KCAP 表和 KC 表,查询每学年(由XQBM 字段的前 13 个字节内容指定),每个班级的课程门数和总学分。要求输出字段依次为学年、BJBH、课程门数、总学分,查询结果按学年排序,输出去向为临时表(表名为 ABCD)。（分数：20.00）_正确答案：(SELECT LEFT(ALLT(XQBM),13)AS 学年,KCAP.BJBH,COUNT($) AS 课程门数,; SUM(XF) AS 总学分; FROM JXSJ!KCAP INNER JOIN JXSJ!KC; ON KCAP.KCDM=KC.KCDM; GROUP BY 1,KCAP.B
9、JBH; ORDER BY 1; INTO CURSOR ABCD)解析：3.设计菜单 JXGL 项目中已存在菜单 MENU,其中已定义了“文件“菜单栏及其中的“退出菜单“项。按如下要求设计菜单,完成后的运行效果如图 1 所示。 1.将“文件“菜单栏修改为“文件管理“,并设置其访问键“F“。 2.在“文件管理“菜单栏中添加菜单项“新建“、“打开“、“关闭“(其中“新建“、“打开“为系统菜单项),并在“打开“与“关闭“、“关闭“与“退出菜单“之间设置分组线。 3.为“关闭“菜单项创建子菜单“数据库“、“表“。 4.为“表“菜单项设置“跳过“条件,使该菜单项不可用。 5.为“数据库“菜单项设置命令
10、,命令的功能是关闭所有已打开的数据库。（分数：20.00）_正确答案：(为“表“菜单项设置“跳过“条件:.T. 为“数据库“菜单项设置命令:CLOSE DATABASE ALL)解析：4.设计表单(10 分) 表单 FRM12E 用于文字缩放演示。按下列要求修改表单,修改后的表单运行时如图 2 所示。 1.设置表单的标题为“文字缩放“。 2.添加标签对象 Label1,并设置相关属性:标题为“等级考试“,且能根据标题内容自动调节大小。 3.添加两个命令按钮,并按图 2 所示设置标题为“缩小“和“放大“,同时设置“缩小“命令按钮的有关属性使其不可使用 4.为“放大“命令按钮编写 Click 事件
11、代码:调用表单的方法XXX(已创建)。 5.将表单的 XXX 方法程序代码,复制到“缩小“命令按钮的 Click 事件代码中,修改程序代码的前 3 行,实现: (1)“缩小“命令按钮不可使用,“放大“命令按钮可使用; (2)标签对象标题逐渐缩小显示。（分数：20.00）_正确答案：( )解析：5.程序改错(5 分) 下列程序中 PrintPrime 过程的功能是查找所有小于自然数 nMax 的素数,并按每行 nCol个素数显示在主窗口中。素数是大于 1 且只能被 1 和自身整除的整数,如 2、3、5、7 等。判断一个自然数N 是否是素数的方法是:用 N 除以从 2 到大于 N 的最小整数之间的
12、每一个整数 j,若所有的 j 都不能整除 N,则 N 为素数。要求: 1.项目中有一个程序文件 Pcode,将 T 盘中 VFP01.TXT 中的程序代码复制到其中并进行修改。 2.在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。 1 CLEAR 2 DO PrintPrime(400,5) 3 PROCEDURE PrintPrime 4 PARA nMax,nCol 5 i=0 &记录素数个数 6 FOR n=2 TO nMax 7 Flag=.T. 8 FOR j=2 TO INT(SQRT(n) 9 IF n%j=0 10 Flag=.F. 11 RETURN 12 ENDIF 13 ENDFOR 14 IF FLag 15 ? n 16 i=i+1 17 IF MOD(i,nCol)=0 18 ? 19 ENDIF 20 ENDIF 21 ENDFOR 22 ENDPROC（分数：20.00）_正确答案：(第 2 行 DO printPrime(400,5) 该为 PrintPrime With 400,5 第 11 行 Return 改为 Exit)解析：
