05-09年浙江省计算机VFP二级考试试卷(含答案) -缩印版.doc

20052009年浙江省计算机等级考试试卷（含答案）（二级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、AMERICANB、USAC、ANSID、BRITISH（12）定义PUBLIC A为公用属性后,执行 ? A 后的结果为 （12） 。A、0 B、.F.C、空格 D、出错（13）执行：王明=10STORE 王明 TO 姓名 变量“姓名”的类型为 （13） 。 A、字符型 B、数值型C、关系型 D、逻辑型（14）执行 ？STR(123.456,6,3) 的结果是 （14） 。 A、123.45 B、123.46C、123.456 D、出错（15）打开某个空表，执行 ? RECNO()的结果为 （15） 。A、.T. B、.F.C、0D、1（16）自定义函数的返回语句最好是选用 （16） 。 A、RETURN B、RETRY C、RETURN 1D、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 奖学金S3 AND S2+S3S1 AND S1+S3S2 S=(S1+S2+S3)/2 S1=SQRT(S*(S-S1)*(S-S2)*(S-S3)ELSE ? 输入有错ENDIFRETU（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 A0 AND B0 AND C0 B、IF A=0 AND B=0 AND C=0 C、IF A=0 OR B=0 OR C=0 D、IF A0 OR B0 OR C=60 ZJ=合格ELSE ZJ=不合格ENDIF ? ZJ? CJUSESET TALK ON程序、 SET TALK OFF DIMENSION A(6,6)FOR K=1 TO 6 FOR T=1 TO 6 IF K=T OR K+T=7 A(K,T)=1 ELSE A(K,T)=0 ENDIF ENDF ENDFOR?A(3,3),A(2,5),A(2,6)SET TALK ON程序3、输入值分别为3、3、6、5、1。 SET TALK OFF N=5 INPUT A= TO A S=A FOR I=1 TO N-1INPUT T= TO TS=S+TIF TA A=TENDIF ENDF ? (S-A)/(N-1) SET TALK ON程序4、SET TALK OFFCLEARS=0FOR M=3 TO 4N=2DO WHILE N= M-1IF INT(M/N) = M/NEXITELSES=S+NENDIFN=N+1ENDDOENDFOR?S=,SSET TALK ON试题五、程序设计题（每题10分，共30分）说明：根据题目要求，利用面向对象程序设计方法在相应对象的事件中编写代码。（1）表单的界面布局已基本完成，与表单有关的表文件已经添加到数据环境中；（2）表单界面中除已经说明设置好的属性外，其他必要的属性一律在事件代码中设置；（3）事件代码中可能涉及的主要属性、事件及方法列表如下（仅供参考）：AdditemControlsourceReadonly RowsourceSetfocusEnabled Recordsource RowsourcetypeButtoncount Forecolor Recordsourcetype SetallButtons Fontsize Refresh TimerCaption Init Release ValueClear InterActiveChangeRemoveitem ValidClick Interval Requery Visible1、 编制一个能进行数字时钟显示功能的表单。表单将自动以1秒为间隔动态显示系统时间，时、分、秒用汉字说明。图1为表单中控件的布局界面，时钟控件名为Timer1，图2 为表单运行后界面。图1 表单中控件的布局界面 图2 表单运行界面2、 编制一个表单完成表文件“课程.dbf”内容的显示功能。命令按钮“上一条”、“下一条”和“退出”名称分别为COMMAND1、COMMAND2和COMMAND3。采用非绑定方式实现。界面如图3、图4所示。具体要求：1） 点击“上一条”按钮时，显示上一条记录。当到达表头时，转到末记录。2） 点击“下一条”按钮时，显示下一条记录。当到达表尾时，转到首记录。3） 当点击“退出” 按钮时，退出表单。图3 表单中控件的布局界面 图4 表单运行界面3、编制一个学生成绩查询表单。初始布局界面如图5所示。具体要求：1）列表框List1中列出所有学生姓名，等待用户选择，采用绑定方式实现。2）选中某个姓名后，列出该学生所有成绩以及平均成绩，如图6所示。图6选中某个姓名后，表单运行界面图5 表单中控件的布局界面 2005年春浙江省高等学校计算机等级考试参考答案（二级Visual FoxPro）试题一、判断题(1)B(2)B(3)A(4)A(5)B(6)A(7)A(8)B(9)B(10)B试题二、单选题(11)A(12)B(13)B(14)B(15)D(16)C(17)A(18)C(19)B(20)C试题三、程序填空题(21)D(22)B(23)A(24)A(25)C(26)D(27)C(28)C(29)A(30)C试题四、程序阅读题1、合格 84.00 2、1 1 0 3、3.004、S= 2试题五、程序设计题1、Form1 Init erval=1000this.timer1.enabled=.t. Timer1 Timer s=substr(time(),1,2)f=substr(time(),4,2)m=substr(time(),7,2)thisform.text1.value=s+时+f+分+m+秒 2、Form1 Init this.text1.value=课程号this.text2.value=课程名this.text3.value=学时数thisform.refreshCommand1 Click skip -1if bof() go bottomendifthisform.text1.value=课程号thisform.text2.value=课程名thisform.text3.value=学时数thisform.refreshCommand2 Click skip if eof() go topendifthisform.text1.value=课程号thisform.text2.value=课程名thisform.text3.value=学时数thisform.refreshCommand3 Click thisform.release3、Form1 Init this.caption=成绩查询this.label1.caption=姓名this.label2.caption=成绩情况this.list1.rowsourcetype=6this.list1.rowsource=学生.姓名this.list2.rowsourcetype=0this.list2.rowsource=select 学生.学号,学生.姓名,成绩.课程号,课程名,成绩 from 学生,课程,成绩 ; where 成绩.学号=学生.学号 and 成绩.课程号=课程.课程号; into table t1this.list2.visible=.f.List1 Interactivechange thisform.list2.clearsele t1stor 0 to a1,a2scan for 姓名=thisform.list1.value thisform.list2.additem(课程号+ +allt(课程名)+ +str(成绩,5,1) a1=a1+成绩 a2=a2+1endscanthisform.list2.additem(平均成绩为: +str(a1/a2,5,1)thisform.list2.visible=.t.2006年春浙江省高等学校计算机等级考试试卷(二级Foxpro)说明： 考生应将所有试题的答案填写在答卷上。其中试题1到试题6请在答卷上的各小题选项的对应位置上填“”。 请将你的准考证号的后五位填写在答卷右下角的指定位置内。 考试时间为90分钟。 本试卷中涉及到的相关表文件，其结构和记录如下所示：试题1、（每空格3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。【程序说明】从键盘输入一个数,说明它是奇数还是偶数。【程序】SET TALK OFFCLEA （1） 输入一个数= TO SHA=INT(SH)IF A=SHIF （2） （3） ELSE? A,是奇数! （4） ELSE? 不是整数ENDIFSET TALK ON【供选择的答案】*1、 A、ACCEPT B、INPUTC、WAIT D、STORE2、 A、INT(A)/2=A/2 B、INT(A/2) C、MOD(A/2)=0 (MOD(A,2) D、A%2=0*3、 A、? A+是偶数! B、? STR(A)-是偶数! C、? A+是偶数! D、? VAL(A)+是偶数!4、 A、ENDCASE B、OTHERWISE C、ENDIF D、ELSE试题2、（每空格3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。【程序说明】统计输出各班获奖学金人数。【程序】SET TALK OFF CLEADB= 学生USE （5） INDEX ON 学号 TO X1DO WHIL ! EOF()S=0BJH=SUBSTR(学号,1,3)DO WHIL (6) IF (7) S=S+1ENDIFSKIP (8) ? BJH,班获奖学金人数为,SENDDOSET TALK ON【供选择的答案】5、 A、&DB B、DB C、(DB+.DBF) D、&DB+.DBF*6、 A、! EOF() B、学号=BJH C、STR(学号,1,3)=BJH D、SUBSTR(学号,1,3)=BJH7、 A、奖学金=0 C、奖学金0 D、奖学金=0 DO CASE CASE X10 S=1 CASE X30 S=2 OTHERWISE S=3 ENDCELSE S=4ENDIF ? S SET TALK ON【供选择的答案】(13) 当X输入为0时，S的输出结果为 (13) 。A、1 B、2 C、3 D、4 (14) 当X输入为-1时，S的输出结果为 (14) 。A、1 B、2 C、3 D、4 (15) 当X输入为30时，S的输出结果为 (15) 。A、1 B、2 C、3 D、4 (16) 当X输入为35-10=25时，S的输出结果为 (16) 。A、1 B、2 C、3 D、4试题5、（每空格3分，共12分）说明：阅读下列程序(段)并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。【程序】SET TALK OFF USE 学生 DISPLAY NEXT 3? RECNO() &第一个显示APPEND BLANK &在表的最后追加一条空记录？RECNO() &第二个显示LOCA FOR 奖学金=50CONT？RECNO() &第三个显示REPL 奖学金 with 100 ALL？RECNO() &第四个显示 USE SET TALK ON【供选择的答案】(17) 第一个显示的RECNO()值为 (17) 。A、2 B、3 C、4 D、5 (18) 第二个显示的RECNO()值为 (18) 。A、5 B、6 C、7 D、8 *(19) 第三个显示的RECNO()值为 (19) 。A、1 B、6 C、7 D、8 (20) 第四个显示的RECNO()值为 (20) 。A、1 B、6 C、7 D、8 试题6、（每空格3分，共12分）说明：阅读下列程序(段)并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。【程序】（注：字符”G”、”O”、”D”的ASCII码分别为71、79、68。）SET TALK OFFCLEARC=一二三四五六七八九十B=GOODR=0FOR I=1 TO LEN(B) W=SUBSTR(B,I,1) D=ASC(W)+R-65 S= IF D+S R=R+6ENDFORSET TALK ON【供选择的答案】(21) 第一个输出结果为 (21) 。A、G-一B、G-二 C、G-五D、G-七 (22) 第二个输出结果为 (22) 。A、O-一B、O-二 C、O-五D、O-七 (23) 第三个输出结果为 (23) 。A、O-一B、O-二 C、O-五D、O-七 (24) 第四个输出结果为 (24) 。A、D-一B、D-二 C、D-五D、D-七 试题7、面向过程程序设计（14分）某次入学考试科目为英语、数学、语文三门课，录取规则是：(1)总分必须200分(含)以上，200分以下不录取。(2)在总分200分(含)以上情况下，单科要求如下： 英语、数学都60分(含)以上的录取； 英语70分(含)以上，并且，数学55分(含)以上的需参加复试决定是否录取； 其他情况一律不录取。输入英语、数学、语文三门课成绩后，显示录取、不录取或复试。试题8、面向对象程序设计（14分）说明：根据题目要求，利用面向对象程序设计方法在相应对象的事件中编写代码。编制一个学生成绩查询表单。初始布局界面如图1所示。命令按钮“查询”、“退出”名称分别为COMMAND1、COMMAND2。具体要求：1) 组合框Combo1 、Combo2分别用于选择“姓名”、“课程名”，并且，在表单的初始化事件（init）中采用绑定来实现；2) 点击“查询”按纽后查询显示相应的成绩，如图2；3) 当查询不到相应的成绩时，显示“没有该成绩”，如图3；4) 点击“退出” 按钮时，退出表单。图1 表单中控件的布局界面 图2 点击查询按纽显示相应的成绩图3当查询不到相应的成绩时，显示“没有该成绩” 2006年春浙江省高等学校计算机等级考试试卷(二级Foxpro)参考答案1. C2. D3. B4. C5. A6. D7. C8. A9. A10. B11. D12. D13. A14. D15. C16. B17. B18. C19. C20. D21. D22. A23. D24. B试题7、面向过程程序设计（14分）SET TALK OFFCLEARINPUT “请输入英语成绩” TO X1INPUT “请输入数学成绩” TO X2INPUT “请输入语文成绩” TO X3X4=X1+X2+X3IF X4=200IF X1=60 AND X2=60?录取ELSEIF X1=70 AND X2=55?复试ENDIFENDIFELSE?不录取ENDIFSET TALK ON试题8、面向对象程序设计(1) form1的init事件THISFORM.COMBO1.ROWSOURCETYPE=6THISFORM.COMBO1.ROWSOURCE=学生.姓名THISFORM.COMBO2.ROWSOURCETYPE=6THISFORM.COMBO3.ROWSOURCE=课程.课程名(2)command1的click事件SELE 成绩LOCATE FOR 学号=学生.学号 AND 课程号=课程.课程号IF FOUND()THISFORM.TEXT1.VALUE=成绩.成绩ELSETHISFORM.TEXT1.VALUE=没有该成绩ENDIF(3)command2的click事件thisform.release2006年秋浙江省高等学校计算机等级考试试卷(二级Foxpro)试题1、（每空格3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。【程序说明】求一元二次方程式ax2+bx+c=0的根，a、b、c的值从键盘输入。【程序】SET TALK OFFCLEAINPUT A= TO AINPUT B= TO B （1） D=B*B-4*A*CP=B/(2*A)IF A#0 （） CASE D0 T=SQRT(D) ? X1=,(-B+T)/(2*A)? X2=,(-B-T)/(2*A) CASE D=0 （） OTHERWISE ? 复根ENDCASE （） ? 不是一元二次方程ENDIFSET TALK ON【供选择的答案】1、 A、WAIT C= TO C B、ACCEPT C= TO C C、STORE C= TO C D、INPUT TO C2、A、DO CASE B、CASE C、IF D0 D、SCAN3、A、? X1=X2=-VAL(P) B、? X1=X2=+P C、? X1=X2=-P D、? X1=X2=-STR(-P)4、A、IF A=0 B、ELSE C、ENDDO D、ENDIF 试题2、（每空格3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。【程序说明】查找课程表中第一个学时数为最小的课程记录，并把该记录的学时数增加5。【程序】SET TALK OFFCLEARUSE 课程GO TOPJXJ=学时数DO WHIL !EOF()IF （5） JXJ=学时数ENDIF （6） ENDDO (7) (8) USESET TALK ON【供选择的答案】5、A、JXJ学时数 B、JXJ5 OR Y5 Z=2ELSE IF X=5 AND Y=5 Z=3 ELSE Z=4 ENDIFENDIF ? Z SET TALK ON【供选择的答案】(13) 当X、Y分别输入为6、5时，Z的输出结果为 (13) 。A、1 B、2 C、3 D、4 (14) 当X、Y分别输入为2、3时，Z的输出结果为 (14) 。A、1 B、2 C、3 D、4 (15) 要使Z的输出结果为3，X、Y分别要取 (15) 。A、5,5 B、4,10 C、4,-1D、取不到 (16) 要使Z的输出结果为1，X、Y分别要取 (16) 。A、4,4 B、4,10 C、4,-1D、取不