Visual Foxpro单元测验(三)(发).doc

Visual Foxpro单元测验三一、 选择题1. VFP6.0程序的三种基本结构是_。 （A）顺序结构、选择结构和循环结构 （B）顺序结构、选择结构和逻辑结构 （C）模块结构、转移结构和循环结构 （D）网状结构、选择结构和逻辑结构2. 用MODIFY COMMAND命令建立命令文件的缺省扩展名是_。 （A）.TXT （B）.FMT （C）.PRG （D）.BAK3.VFP6.0命令文件（或称程序文件）的缺省扩展名是_。 （A）.FRM （B）.PRG （C）.FOR （D）.DOC4. 在VFP6.0程序中，一条命令的长度不能超过_个字符。 （A）8192 （B）254 （C）256 （D）1275. 可以用MODIFY COMMAND命令编辑的文件是_。 （A）ABC.DBF （B）STUD.IDX （C）PAK.BAK （D）WP_SKQ.PRG6. 建立命令文件ABC.PRG的命令是_。 （A）USE ABC.PRG （B）MODIFY COMMAND ABC （C）MODIFY STRUCTURE ABC.PRG （D）MODIFY ABC.PRG7. 在定义过程文件中的每一个过程时，每一个过程必须以（ ）A. FUNCTION B. SET PROCRDURE TOC. PROCEDURE D. PARAMETERS8. 结构化程序的三基本结构是顺序结构，分支结构和（ ）A模块结构 B循环结构 C表结构 D条件结构9. 如果当前目录下有SEE.PRG、SEE.FRX、SEE.TXT和SEE.BAK这样一些文件，当执行命令MODIFY COMMAND SEE时,打开的文件是_。 （A）SEE.TXT （B）SEE.FRX （C）SEE.PRG （D）SEE.BAK10. 当程序输入或修改完毕，可以按_ 键存盘并返回VFP。 （A）Ctrl+N （B）Ctrl+Y （C）Ctrl+W （D）Ctrl+Q11. VFP中执行命令_,可运行命令文件ZK.PRG. （A）DO ZK.PRG （B）RUN ZK.PRG （C）ZK （D）CALL ZK.PRG12. 在程序中执行命令_将退出VFP返回到操作系统。 （A）RETURN （B）CANCEL （C）QUIT （D）EXIT13. 如果当前目录下有ZK.PRG、ZK.MPR、ZK.QPR和ZK.FRX这些文件， 当执行DO ZK命令时，系统实际运行的文件是_。 （A）ZK.PRG （C）ZK.MPR （C）ZK.FRX （D）ZK.QPR14. 在子程序中，定义接受来自调用程序传递的参数的命令是（ ）A. PARAMETERS B. ORICEDYREC. RETURN D. FRNCTION15.有如下Visual FoxPro程序M=1N=0DO WHILE N=60.IIF(CJ=85,优秀，良好),差”) （A）优秀 （B）差 （C）良好 （D）8234. 命令“CLOSE ALL的功能是_。 （A）关闭所有文件不清除内存变量 （B）只关闭数据库 （C）关闭所有文件且清除内存变量 （D）清除内存35. 在下面的DO循环中，一共要循环_次。 M=5 N=1 DO WHILE N=X Y=Y-1 ENDDO （A）15 （B）10 （C）6 （D）537. 调用子程序传递实参时，通过_子句。A.parameters B.WITH C.TO D.INPUT38. 自定义函数中一定具有_语句。A.parameters B.return C.procedure D.close39. 过程文件中一定具有_语句。A.parameters B.priv C.procedure或function D.close二、 是非判断题 1. 在编写VFP程序时，每行只能写一条命令。 （ T ） 2. VFP程序中一条命令可以占用多行，但必须使用“，”做为续行符。（F ） 3. 使用 MODIFY COMM 命令建立文件的缺省扩展名为.PRG。（ T ） 4. ACCEPT 命令可用于输入任何类型的数据。（ F ） 5. 用 ACCEPT 命令输入字符串时，必须使用定界符。（ F ） 6. 变量必须使用“=”来赋值。（ F ） 7. 程序未尾的 RETURN 命令不能省略。（ F ） 8. 在 DO CASE 命令所构成的多分支结构中，如果有多个CASE子句的条件为.T. (真)，将依次执行这些CASE 子句后面的命令序列。（ F ） 9. 命令RETURN和EXIT命令相同，都结束程序。（ F ） 10. 命令 CLEAR ALL 的作用是清除整个屏幕。（ F ）三、填空题 1. 在数据表文件 XS.DBF 中查询姓名为刘明的记录， 若其总分大于等于250分，则显示他的学号、姓名、专业和总分。(学完第四章后做) SET TALK OFF USE XS _ SEEK 刘明 IF FOUND() IF_ ?学号:,学号 ?姓名:,姓名 ?专业:,专业 ?总分:,总分 ELSE ?刘明的总分小于250分! ENDIF ELSE ?表中没有刘明的记录! ENDIF USE RETURN 2. 逐条显示数据表 STU.DBF 中的所有记录。 SET TALK OFF USE STUD DO WHILE _ DISPLAY _ WAIT 按任意键显示下一条记录! ENDDO USE RETURN 3. 在表 SSS.DBF 中查询某专业的学生, SSS.DBF中有“专业”字段名。 SET TALK OFF USE SSS ACCEPT 请输入专业名称: TO ZY LOCATE FOR 专业=ZY IF _ ？ 没有符合条件的记录，按任意键结束! WAIT CLEAR RETURN ENDIF * 逐条显示该专业所有学生的记录 DO WHILE .NOT.EOF() DISPLAY _ ENDDO WAIT RETURN 4. 在表ABC.DBF 中查询“姓名”为李燕的记录。 SET TALK OFF USE ABC _ SEEK 李燕 IF FOUND() DISPLAY ELSE ?库中没有李小燕的记录! ENDIF USE RETURN 5. 本程序是根据输入的表，在表中查找指定“姓名”的记录，如果找到则删除此记录 set talk off accept 输入数据表名： to kname use _ accept 姓名： to name locate _ if .not._ _ else ? 查无此人endifuse set talk onreturn 6. 设学生的数学、 物理、 英语这三门课程的期末考试成绩存在放在表 CJ.DBF 中。如果某一学生三门课程的成绩均达到 85 分以上(包括 85 分在内)， 应在该学生记录的“等级”这一字段中填入“优秀”。 SET TALK OFF USE CJ DO WHIL.NOT.EOF() IF 数学=85_ _ ENDIF SKIP ENDDO USE RETURN 7. 在表 STUD.DBF 中查找总分最高者并输出其姓名、专业和总分。 SET TALK OFF USE STUD XM=姓名 ZY=专业 ZF=总分 DO WHILE.NOT.EOF() _ IF ZF姓名，物理 CLOSE ALL RETURN (1) 第一条命令?显示的值分别为_。 （A）1002、李小锋、90 （B）0004、方平军、82 （C）2009、王子李、72 （D）1002、李小锋、78 (2) 第二条命令?显示的值分别为_。 （A）2020、李旭君、85 （B）3020、李旭君、86 （C）2009、王子李、83 （D）1002、李小锋、93 2. 有以下两个表文件，其中表文件 KU1.DBF 中的记录如下： Record # 学号 姓名 性别 专业 1 96004 罗华东 男 机械工程 2 96005 姜山 男 计算机科学 3 96006 张玲 女 经济管理 4 96007 王先林 男 应用化学 表 KU2.DBF 中的记录如下： Record # 学号 上机 笔试 1 96004 84 77 2 96005 56 83 3 96006 91 93 4 96007 63 51 执行以下程序： SET TALK OFF SET DELETED ON SELECT 2 USE KU2 INDEX ON 学号 TAG XH2 SELECT 1 USE KU1 INDEX ON 学号 TAG XH1 SET RELATINO TO 学号 INTO B COPY TO KU3 FIELDS 学号，姓名，性别，B上机，B笔试 USE KU3 DELETE ALL FOR 上机60.OR.笔试=5 EXIT ENDIF ENDDO ?X,Y 当程序执行到?命令时，X与Y的值分别为_。 2. 设 ZGK.DBF 为职工数据表文件，“姓名”为该表中一字符字段名。 USE ZGK DO WHILE.NOT.EOF() IF.NOT.张$姓名 SKIP LOOP ENDIF DISPLAY SKIP ENDDO USE RETURN 本程序的作用_。 3. SET TALK OFF A=1 DO WHILE A5 B=1 DO WHILE B5 IF A*B=5 exit endif enddo ?x,y则程序运行后x为 _ ，y为 _Visual Foxpro单元测验三一、 选择题1.A 2.C 3.B 4. B 5.D 6.B 7. A或C 8.B 9.C 10.C 11.A 12.C 13.A 14.A15.B 16. D 17.C 18.C 19.B 20.C 21.D 22.B 23.C 24.D 25.D 26.C 27.B28. C 29.B 30.A 31.D 32.A或C 33.C 34.A 35.D 36.C 37.B 38.B 39.C二、 是非判断题1.T 2.F 3.T 4.F 5.F 6.F 7.F 8.F 9.F 10.F三、填空题1、 index on 姓名 tag xm if 总分=2502、 do while .not. eof() skip3、 not found() 或 eof() continue4、 index on 姓名 tag xm5、 &kname for 姓名=name eof() delete6、(有问题) an