发布时间 : 星期一 文章05-09年浙江省计算机VFP二级考试试卷（含答案）-缩印版更新完毕开始阅读61dafe4f852458fb770b560a
2005—2009年浙江省计算机等级考试试卷（含答案）
（二级Visual FoxPro）
2005年春浙江省高等学校
计算机等级考试试卷（二级Visual FoxPro）
说明：（1）考生应将试题一至试题三的答案涂写在答题卡上，将第四、五题的答案填写在
答卷上，否则作无效处理；
（2）请将你的准考证号的后面四位填写在答卷的右下角指定位置内； （3）考试时间为120分钟；
（4）本试卷中涉及到的相关表文件，其结构和记录如下所示： 1、学生.DBF
结构：学号 姓名 性别 出生年月 简历 奖学金 照片
C,6 C,8 L,1 D,8 M,4 N,6,2 G,4 记录:
记录号# 学号 姓名 性别 出生年月 简历 奖学金 照片
1 951001 王平 .F. 05/06/70 memo 50.00 gen 2 951003 李华 .F. 01/23/71 memo 25.00 gen 3 954006 张小强 .T. 07/21/70 memo 0.00 gen 4 953008 赵峰 .T. 11/05/72 memo 75.00 gen 5 954011 丁超 .T. 09/27/70 memo 0.00 gen 6 953013 罗浩 .T. 09/09/71 memo 50.00 gen
（注：性别=.F.为女，性别=.T.为男） 2、课程.DBF
结构：课程号 课程名 学时数
C,4 C,20 N,3 记录:
记录号# 课程号 课程名 学时数
1 0001 高等数学 108 2 0002 英语 90 3 0003 计算机基础 68 4 0004 数据库应用 80 5 0005 工程制图 80
试题一、判断题（每小题1分，共10分）
说明：以下提供的若干陈述中，逐一判断其正确与否，选A表示正确，选B表示错误。 （1）数据库管理系统包括计算机硬件。
（2）Visual FoxPro 6.0的设计工具只有设计器和向导两类。 （3）数组名和字段名可以同名。
（4）执行APPEND命令后，系统就进入了全屏幕编辑状态。 （5）表达式6-3中的运算符“-”是作单目运算符使用。
（6）执行RETURN TO MASTER 可能返回到Visual FoxPro命令窗口。 （7）命令按纽组中的Buttons属性是一个数组名。 （8）数据之间的联系类型有选择、投影和连接三种。 （9）一个工作区同时可以打开多个表文件。
（10）在多用户共享环境下，对文件加锁只能使用函数FLOCK()实现。 试题二、单选题（每小题2分，共20分）
（11）日期型数据的默认格式为 （11） 。
A、AMERICAN B、USA C、ANSI D、BRITISH （12）定义PUBLIC A为公用属性后,执行 ? A 后的结果为 （12） 。
A、0 B、.F. C、空格 D、出错 （13）执行：王明=10
STORE 王明 TO 姓名
变量“姓名”的类型为 （13） 。 A、字符型 B、数值型 C、关系型 D、逻辑型 （14）执行 ？STR(123.456,6,3) 的结果是 （14） 。 A、123.45 B、123.46 C、123.456 D、出错 （15）打开某个空表，执行 ? RECNO()的结果为 （15） 。
A、.T. B、.F. C、0 D、1 （16）自定义函数的返回语句最好是选用 （16） 。 A、RETURN B、RETRY
C、RETURN 1 D、RETURN TO MASTER
（17）显示表“学生.dbf”中所有奖学金50（含50）以下男生的姓名和简历，应使用的命令为 （17） 。
A、LIST FIEL姓名,简历 FOR 奖学金<=50 AND 性别
B、LIST FIEL姓名,简历 FOR 奖学金<=50 WHILE 性别=.T. C、LIST FIEL姓名,简历 FOR 奖学金<=50 AND 性别=\男\ D、LIST FIEL姓名,简历 FOR 奖学金<=50 OR 性别=.T.
（18）下面关于数据环境和数据环境中表的陈述中，正确的是 （18） 。
A、 数据环境是对象，表不是对象 B、 数据环境不是对象，表是对象 C、 数据环境是对象，表也是对象 D、 数据环境和表都不是对象
（19）在查询设计器中已设定联接条件为“学生.学号=成绩.学号”,若要在查询结果中显示学生表中所有记录及成绩表中满足条件的记录，则联接类型应为 （19） 。
A、内部联接 B、左联接 C、右联接 D、完全联接 （20） 假定表单中包含两个文本框分别为TEXT1和TEXT2，从TEXT1发消息到TEXT2，使TEXT2的值为0的正确命令是 （20） 。
A、 THISFORM.TEXT1.TEXT2.VALUE=0 B、 THIS.TEXT2.VALUE=0 C、 THIS.PARENT.TEXT2.VALUE=0 D、 THIS.FORM1.TEXT2.VALUE=0
试题三、程序填空题（每空格2分，共20分）
说明：阅读下列程序说明和相应程序（段），在每小题提供的若干可选答案中，挑选一个正确答案。 程序1、
【程序说明】
将表“学生.DBF”中指定学生（由键盘输入）的奖学金加60，并显示该学生记录。 【程序】
SET TALK OFF CLEA USE 学生
ACCEPT '输入学生学号=' TO M (21) IF !EOF()
(22) DISP ELSE
？ '没有找到！'
(23) USE
SET TALK ON
（21）A、FIND &M B、SEEK M
C、LOCA FOR ‘学号’=M D、LOCA FOR 学号==ALLT(M) （22）A、奖学金=奖学金+60
B、REPL 奖学金 WITH 奖学金+60
C、REPL 奖学金 WITH 60
D、APPEND 奖学金+60
（23）A、ENDIF B、ENDDO C、ENDCASE D、RETU 程序2、
【程序说明】
输入三个数，计算该三个数所构成的三角形面积。如果给定的三个数构成一个三角形，则输出面积值，否则输出‘输入有错’。 【程序】
SET TALK OFF CLEA
（24） INPUT 'A=' TO A INPUT 'B=' TO B INPUT 'C=' TO C
（25） ? '输入有错' ELSE
（26）
? A
WAIT '输入是否继续？（Y-继续/N-退出）' TO X IF UPPER(X)= 'N' EXIT
ENDIF
ENDIF
ENDF
SET TALK ON
*AREA.PRG
（27） IF S1+S2>S3 AND S2+S3>S1 AND S1+S3>S2 S=(S1+S2+S3)/2
S1=SQRT(S*(S-S1)*(S-S2)*(S-S3)) ELSE
? '输入有错' ENDIF RETU
（24）A、FOR I=1 TO 1 STEP 0
B、DO WHIL .T. (没有ENDDO) C、FOR I=1 TO 5 STEP -1
D、S=0
（25）A、IF A<0 AND B<0 AND C<0 B、IF A<=0 AND B<=0 AND C<=0 C、IF A<=0 OR B<=0 OR C<=0 D、IF A<0 OR B<0 OR C<0 （26）A、DO AREA
B、DO AREA(A,B,C)
C、DO AREA A,B,C WITH S1,S2,S3 D、DO AREA WITH A,B,C
（27）A、S=0 B、STORE A,B,C TO S1,S2,S3 C、PARA S1,S2,S3 D、PARA A,B,C 程序3、
【程序说明】
下面程序实现一只小球在表单的高度范围(顶部与底部)内作动态的上下滚动。 【程序】
表单Form1的Init事件代码：（已经新建了表单属性B） THIS.B=0
THIS.TIMER1.INTERVAL=100 （28）
THISFORM.SHAPE1.CURVATURE=99 THISFORM.SHAPE1.HEIGHT=30 THISFORM.SHAPE1.WIDTH=30
时钟控件Timer1的Timer事件代码： （29）
THISFORM.B=1
ENDIF
IF THISFORM.SHAPE1.TOP=0
THISFORM.B=0
ENDIF
（30）
THISFORM.SHAPE1.TOP=THISFORM.SHAPE1.TOP+1
ELSE
THISFORM.SHAPE1.TOP=THISFORM.SHAPE1.TOP-1
ENDIF
（28）A、THIS.TIMER1.SHOW=.T. B、THIS.TIMER1.SHOW=.F.
C、THIS.TIMER1.ENABLED=.T.
D、THIS.TIMER1.ENABLED=.F.
（29）A、IF THISFORM.SHAPE1.TOP=THISFORM.HEIGHT-30 B、IF THISFORM.SHAPE1.TOP=THISFORM.HEIGHT-40
C、IF THISFORM.SHAPE1.BOTTOM=THISFORM.HEIGHT-30 D、IF THISFORM.SHAPE1.BOTTOM=0 （30）A、IF THIS.B=0 B、IF THIS.B=1
C、IF THISFORM.B=0 D、IF THISFORM.B=1
试题四、程序阅读题（每小题5分，共20分）
说明：阅读下列程序，将运行时的输出结果写在答卷纸的相应题号下。 程序1、A的输入值为951003。
SET TALK OFF USE CLEAR SET TALK ON USE 成绩 程序２、
SET TALK OFF ACCEPT \输入学生学号=\
DIMENSION A(6,6) AVER 成绩 TO CJ FOR 学号
FOR K=1 TO 6 =ALLT(A)
FOR T=1 TO 6 IF CJ>=60
IF K=T OR K+T=7 ZJ=’合格’
A(K,T)=1 ELSE
ELSE
ZJ=’不合格’
A(K,T)=0
ENDIF
ENDIF
? ZJ
ENDF
? CJ
ENDFOR