VFP程序设计复习题

《VFP程序设计复习题》由会员分享，可在线阅读，更多相关《VFP程序设计复习题（36页珍藏版）》请在装配图网上搜索。

1、VFP程序设计复习题1、在有关数据库的概念中，若干记录的集合称为 ( D )。 2、要计算职称为副教授或教授的工资总额,下列命令中错误的是 ( D)。 A.SUM 工资 FOR 职称=副教授.OR.职称=教授 B.SUM ALL 工资 FOR 职称=副教授.OR.职称=教授 C.SUM 工资 FOR 教授$职称 D.SUM 工资 FOR 职称=副教授.AND.职称=教授3、不允许记录中出现重复索引值的索引是 ( C )。 B.主索引、候选索引、普通索引 D.主索引、候选索引和唯一索引4、在Visual FoxPro中，打开数据库的命令是 ( A )。 A.OPEN DATABASE B.USE

2、 C.USE DATABASE D.OPEN 5、连续执行以下命令之后，最后一条命令的输出结果是 ( C )。SET EXACT OFF X=A ?IIF(A=X,X-BCD,X+BCD)6、在以下四组函数运算中，结果相同的是 ( A )。 A.LEFT(Visual FoxPro,6)与SUBSTR(Visual FoxPro,1,6) B.YEAR(DATE()与SUBSTR(DTOC(DATE(),7,2) C.VARTYPE(36-5*4)与VARTYPE(36-5*4) D.假定A=this , B=is a string, A-B与A+B7、在Visual Foxpro中，用于建立

3、或修改过程文件的命令是 ( B)。 A. MODIFY B. MODIFY COMMAND C. MODIFY PROCEDURE D. 上面B)和C)都对8、使用命令DECLARE mm(2,3)定义的数组，包含的数组元素(下标变量)的个数为 ( D)。 A.2 B. 3 C.5 9、APPEND命令的功能是 ( B )。 B. 在表的最后面插入一条记录 10、打开学生表及(对成绩字段的)索引文件，假定当前记录号为200，欲使记录指针指向记录号为100的记录，应使用命令 ( C)。 A.LOCATE FOR 记录序号=100 B.SKIP 100 C.GOTO 100 D.SKIP -100

4、11、使用TOTAL命令生成的分类汇总表文件的扩展名是 ( B )。 A.DBT B.DBF 12、STORE CTOD(05/06/98)TO MDATE ( C)。 ?MDATE A.05/09/98 13、假定系统是期是2004年01月05日，有如下命令： ( A)。NJ=YEAR(DATE() A.2004 B.01 C.05 D.01/05/0414、有以下命令序列： USE STUDENT LIST record# 姓名 出生日期 1 欧阳惠 07/12/69 2 李明 02/24/70 3 杨霞 11/05/71 INDEX ON 出生日期 TO BD LIST 执行该命令序列后

5、，显示记录号的顺序是 ( A)。 A.1 2 3 B.3 2 1 C.2 1 3 D.1 3 215、学生表文件中共10条记录，其姓名字段值均为学生全名，执行如下命令序列： USE STUDENT ?recno() 最后，recno()函数的显示值是 ( A )。 A.1 B.0 C.10 16、比较表达式的结果是 ( B)。 17、用COPY STRU TO 形成的文件是 ( A)。 18、不能作为索引关键字的数据类型是 （B ）。 19、显示数据表当前记录内容的命令是 ( A )。 A.LIST NEXT 1 B.DISPLAY ALL C.TYPE D.DISP REST20、执行USE

6、命令的作用是 ( B)。 C. 关闭所有文件 21、函数EOF()用于检测当前数据库记录指针是否达到 ( B )。 A、文件头 B、文件尾C、指定记录 D、第一条记录22、建立表文件用( ) 命令。 ( C)。 A、MODI COMM B、EDITC、CREATE D、MODI STRU23、INSERT 命令将一条新记录加到 ( B)。 A、当前记录之前 B、当前记录之后 C、文件末尾 D、文件顶部24、下述命令中不能关闭数据表的命令是 ( C)。 A、USE B、CLOSE DATABASE C、CLEAR D、CLOSE ALL25、以下表达式的结果为数值型的是 ( D)。 A、牛$ 牛

7、群B、wish youwish you success C、98/6/14+15D、1994-08-06-1992-08-1126、用菜单方式打开一个数据表文件应该使用的菜单序列为 ( A)。 A、文件打开表 B、文件打开表格 C、文件新建数据表D、数据表 打开27、清除主窗口屏幕的命令是 ( A )。 A、CLEAR B、CLEAR ALL C、CLEAR SCREEND、CLEAR WINDOWS28、对于只有两种取值的字段，一般使用的数据类型是 ( D)。 A、字符型B、数值型 C、日期型D、逻辑型29、在下面的Visual FoxPro表达式中，不正确的是 ( C )。 A、2008-

8、05-01 10:10:10 AM-10B、2008-05-01-DATE() C、2008-05-01+DATE() D、2008-05-01+100030、下面( )不是VFP程序文件中可以使用的注释语句。 ( C )。 A、NOTE B、* C、/ D、& 31、Visual FoxPro 6.0中，命令?VARTYPE(12/31/99)的输出结果是 ( C )。 A、DB、N C、CD、U32、下列各字符组合中( )不是VFP中的字符常量。 ( A )。 A、计算机应用B、2008 C、ABCDE D、101.86733、下列不能关闭数据表的是 ( A)。 A、browseB、cle

9、ar all C、close allD、close database34、执行以下命令后显示的结果是( )。 N=356.54 ?87+&N ( C )。 A、87+&NB、 CD、出错信息35、下列表达式中， ( )表达式的值是数值。 ( B )。 A、ABC+D B、2008/05/17-2008/04/09 C、123+456D、2003/05/18+1536、逻辑型字段团员其值为真的正确条件表达是 ( C )。 A、FOR 团员=TB、FOR 团员=.T. C、FOR 团员D、FOR 团员=.Y.37、函数LEN(TRIM(SPACE(8)-SPACE(8)返回的值是 ( C )。 A

10、、8B、16 C、0D、出错 38、执行LIST ALL命令后，记录指针指向 ( D )。 A、第一条记录B、最后一条记录 C、第一条记录的前面D、最后一条记录的后面39、逻辑运算符在运算时，其优先顺序是 ( A)。 A、NOT AND ORB、AND NOT OR C、OR NOT ANDD、从左至右按先后顺序40、显示当前表中所有带删除标记的记录的命令是 ( A )。 A、DISPLAY FOR DELETED()B、DISPLAY FOR NOT DELETED() C、DISPLAY DELETED() D、DISPLAY RECORD DELETED()41、当前表中含姓名字段，显示

11、李姓的所有记录的命令是 ( B )。 A、DISPLAY FOR 李=姓名 B、DISPLAY FOR 姓名=李 C、DISPLAY SUBSTR (姓名,1,2)=李D、DISPLAY SUBSTR (姓名,1,1)=李42、下列函数中，运算结果为字符型的是 ( D )。 A、AT(ABC,智能ABC)B、INT(123.456) C、VAL(12/12/66)D、DTOC(DATE()43、在VFP中，可以对数值型同时也可以对字符型内存变量输入数据的命令是 ( B )。 A、ACCEPTB、INPUT C、WAITD、EDIT44、下面( )不属于VFP的循环控制语句。 ( D )。 A、

12、 DO WHILE ENDDOB、FOR ENDFOR C、SCANENDSCAN D、DO CASEENDCASE45、有一个表文件GZ.DBF，已经打开。其中有字段名“基本工资”、“实发工资”。下面按“实发工资”进行索引的操作不正确的是 ( D )。 A、INDEX ON 实发工资 TO SFGZ B、INDEX ON 实发工资 TAG 实发工资 D、INDEX ON 基本工资 TO JBGZ46、SEEK和FIND命令是作用于( ) 的快速检索命令。 ( C ) A、表文件B、命令文件( ) C、索引文件D、排序文件47、表文件KD.DBF打开后，执行命令SKIP -1，下列命令中结果为

13、.t.的是 ( B )。 A、?RECNO()B、?BOF() C、?EOF()D、DISP48、要为当前表所有职工增加100元工资应该使用命令 （D ）。 A、CHANGE 工资 WITH 工资+100 B、REPLACE 工资 WITH 工资+100 C、CHANGE ALL 工资 WITH 工资+100 D、REPLACE ALL 工资 WITH 工资+10049、如果一个字段的宽度为8,则此字段的类型不可能是 （D ）。 A、数值型B、字符型 C、日期型D、备注型50、函数EOF()用于检测当前数据库记录指针是否达到 （ B ）。 A、文件头B、文件尾 C、指定记录D、对数据表文件无作

14、用51、在VFP中，通用型字段G和备注型字段M在表中的宽度都是 (B )。 A、2个字节 B、4个字节 C、8个字节D、10个字节 52、执行命令DIMENSION M(4,2)之后，数组的下标变量个数和初值分别是 ( A)。 A、8,.F.B、4,.T. C、8,OD、2,空值 53、在当前表中，查找第2个女同学的记录，应使用命令是 ( C)。 A、LOCATE FOR 性别=女 NEXT 2 B、LOCATE FOR 性别=女 C、LOCATE FOR 性别=女和 CONTINUE D、LIST ROR 性别=女 NEXT 254、建立表文件结构时，需要定义的参数为 (C )。 A、表文件

15、名、表的大小、字段名、字段类型 B、字段名、字段类型、记录个数、字段宽度 C、字段名、字段类型、字段宽度、小数位数 D、表文件名、字段名、字段类型、字段宽度55、ABC.DBF是一个有两个备注型字段的表文件，使用COPY TO PSQ命令进行复制操作，其结果将 ( B)。 A、到一个新的表文件 B、得到一个新的表文件和一个新的备注文件 C、得到一个新的表文件和两个新的备注文件 D、显示出错误信息，表明不能复制具有备注型字段的数据56、表文件的数值型字段要求保留2位小数，那么该字段宽度最少应当定义成( )位。 (B )。 A、2B、3 C、4D、5 57、要在当前表文件的当前记录之后插入一条新记

16、录，应该使用命令是 ( D )。 A、APPENDB、EDIT C、CHANGED、INSERT58、DELETE命令的功能是 ( A )。 A、为当前记录做删除标记 B、直接物理删除当前记录 C、删除当前数据库文件的所有记录 D、在提问确认后物理删除当前记录59、下列不能作为查询的命令是 ( B )。 A、locateB、index C、SEEKD、FIND 60、在建立表结构(modi stru)过程中不须要输入字段宽度的字段类型是 ( C)。 A、字符型B、数值型 C、备注型D、符型和数值型 61、在以下关于索引的说明中，错误的是 ( B )。 A、索引可以提高查询速度B、索引可能降低更

17、新速度 C、引和排序具有不同的含义D、引文件比排序文件小62、计当前工作区记录数的函数是 ( B )。 A、RECNO( ) B、RECCOUNT( ) C、FCOUNT( )D、FOUND( )63、已知P=DATE(),则P为( )型内存变量。 ( B )。 A、字符B、日期 C、逻辑D、数值64、在下列VFoxPro的表达式中，结果为.T.的是 ( B )。 A、112=90B、张先生=李先生 C、90/09/09-8500 EXIT ENDIF STORE 3*X TO X ENDDO ?Y SET TALK ON RETURN 答案为:2.已知S1=1,S2=1+2,S3=1+2+3

18、,SN=1+2+N,下面的程序求S20到S80有多少数能被17或35整除。改正后运行程序，将程序执行结果填入答案框内。SET TALK OFFI=20 N=0DO WHILE I=80 STORE 0 TO S J=1 DO WHILE J=25中止。程序中有错误。改正后运行程序，将程序执行结果填入答案框内。 SET TALK OFF CLEAR s=0 k=1 DO WHILE .T. s=s*k IF k=25 EXIT ENDIF k=k+4 ENDDO ?s RETURN答案为:4.下面的程序是求1到500的偶数立方和与奇数立方和之差。程序中有一处错。更正程序中的错误,运行更正后的程序

19、,记录运行结果,将结果填入答题窗口内。SET TALK OFFSTORE 0 TO I,S1,S2DO WHILE I=500 I=I+1 IF MOD(I,2)=0 S1=S1+I*I*I ELSE S2=S2+I*I*I ENDIFENDDO? S1-S2SET TALK ONRETURN答案为:5.程序求能被3整除且至少有一位数字为5的三位数的个数。程序中有一行有错误。更正程序中的错误，运行更正后的程序，记录运行结果，将结果填入答题窗口。SET TALK OFFCLEARS=0X=100DO WHILE X=999 IF MOD(X,3)0 A=INT(X/100) B=INT(X/10

20、)-A*10 C=X-A*100-B*10 IF A=5 .OR. B=5 .OR. C=5 S=S+1 ENDIF ENDIF X=X+1ENDDO答案为:6.下面的程序是求在1,2,3,4,.,10这10个数中,任意选两个不同的数,求它们的和能被2整除的数的总对数. (注意: 象3+5和5+3认为是同一对数). 程序中有一处错误。改正程序中的错误后运行程序，将程序执行结果填入答案框内。 SET TALK OFF CLEAR N=0 I=1 DO WHILE I=10 J=1 DO WHILE JI IF INT(I+J)/2)(I+J)/2 N=N+1 ENDIF J=J+1 ENDDO

21、I=I+1 ENDDO ?N SET TALK ON RETURN答案为:7.已知一个数列的前三个数是1,2,3,从第四个数起,每个数都是前三个数之和。下面的程序是求出该数列的第15个数。改正程序中的错误后运行程序，将程序执行结果填入答案框内。 SET TALK OFF DIME A(15) A(1)=1 A(2)=2 A(3)=3 I=4 DO WHILE I=15 A(I)=A(I-1)+A(I-2)+A(I-3) I=I+1 ENDDO ? A(15) SET TALK ON RETURN 答案为:四、程序填空并得到答案1.语句或另外编写程序，(程序名由考生自定）运行程序，将结果填入答题

22、窗口。 SET TALK OFF CLEAR S=0 I=8 DO WHILE I=10 STORE 1 TO T,J DO WHILE J=I T=T*J J=J+1 ENDDO _ I=I+1 ENDDO ?S SET TALK ON RETURN答案为:2.设S=1+1/2+1/3+.+1/N，N为正整数。编程求使S不超过10的最大的N.(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。 set talk off clear s=0 i=1 do while s=10 s=s+1/i _ enddo ? i-2 set talk on retu

23、rn答案为:3.输出10,100中除以17的余数和除以5的商相等的整数的个数。SET TALK OFFN=0FOR K=10 TO 100 IF _ ? K N=N+1 ENDIFENDFOR? NRETURN答案为:4.输出10,100中除以15的余数和除以4的商相等的整数的个数。SET TALK OFFN=0FOR K=10 TO 100 IF _ ? K N=N+1 ENDIFENDFOR? NRETURN答案为:5.统计区间1000，9999内所有能被3整除，且千位数字与个位数字之和为8的整数的个数。 Set talk off t=0 I=1000 do while I500 EXIT

24、 ENDIF ENDIFNEXT?S=,SRETURN答案为:8.编程求S=1*3+2*4+3*5+.+198*200。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。SET TALK OFFS=0N=1DO WHILE N=198 _ N=N+1ENDDO? SSET TALK ONRETURN答案为:9.求出所有能被17整除且不含重复数字的三位数的和。(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。 set talk off i=100 store 0 to t do while i=999 a=int(i/100) b

25、=int(i-a*100)/10) c=mod(i,10) if _ t=t+i endif i=i+1 enddo ?t return答案为:10.统计区间1000，9999内所有能被3整除，且千位数字与个位数字之和为8的整数的个数。 Set talk off t=0 I=1000 do while I3000止，求此时数列中最大的元素值。(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。SET TALK OFFCLEARs=0p=0i=1DO WHILE .t. p=p+i _ IF s3000 EXIT ENDIF i=i+1enddo? p

26、RETURN答案为:13.求200，600间奇数之和。(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。Set talk offs=0for I=200 to 600 if _ loop endif s=s+Iendfor? Sreturn答案为:14.编程求区间5000，9999中所有素数的个数.(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口.Set talk off I=9999t=0do while I=5000 j=2 do while j=680000为止的奇数N。答案为:9.1!+2!+3!+

27、.+n! 当s大于61000时结束累加，求n。答案为:一、 求余数类1.统计1000，4000内所有既能被7整除，且至少有一位数字是6的数的个数3.求连续N个不是7的倍数的自然数之和，当和是101的倍数时显示最后的自然数。4.编程序求在 3000 以内被 17 或者 23 整除的正整数数的个数。5.下面的程序是求1到2000之间的不能被3或5或7整除的整数之和。6.编写程序，求11000之间能被3整除的数的个数。7.编写程序，求在1000以内能被17或23整除的正整数的个数。8.编写程序，求出1-5000以内能被3或者7整除数的个数。9.编写程序，求1到2000之间的不能被3或5或7整除的整数

28、之和。10.编程序求出1-5000以内能被37整除的整数之和。11.编写程序，求100，5000既能被6整除又能被7整除的数之和。12.求551,732之间所有不能被3整除,但能被8整除的整数的和。13.计算10005000之间能被13或15或17整除的数。问：这些整数的和是多少？14.编程序求出300到500之间同时满足除3余2和除5余3条件的数的个数。15.编程序求出1-800以内的能被7整除的数的平方和。16.求出100，500以内同时满足除以7余1，除以5余3,除以3余1的所有整数个数。17.求105，625间能被3和5整除的自然数之和。18.编程序统计 11000 能被 3 整除的数

29、的个数19.编程序求出 1 到 5000 之间的能被 5 整除的前若干个偶数之和，当和大于 500 时程序退出20.编程序求出 100 到 200 之间同时满足除 3 余 2 和除 5 余 3 条件的数的个数。21.编程序求在 3000 以内被 17 或者 23 整除的正整数数的个数22.统计区间1000，9999内所有既能被3整除，且千位数字与个位数字之和为8的整数的个数。23.编程序求出 1-100 以内的能被 9 整除的数的平方和。24.求 1 ， 999 之间能被 3 整除，且至少有一位数字是 5 的所有正整数的个数。25.编程序求出100到500之间同时满足除3余2和除5余3条件的数

30、的个数。26.编程序求出1-200以内的能被7整除的数的平方和。27.求1到3000之间的能被13或15或17整除的整数之和.28.统计区间1000，9999内所有既能被3整除，且千位数字与个位数字之和为8的整数的个数。29.下列程序求出所有能被17整除且不含重复数字的三位数的和。30.求出100，500以内同时满足除以7余1，除以5余3,除以3余1的所有整数的个数.二、应用题类1.有30个人在一家小餐馆里用餐，其中有男人、女人和小孩。每个男人花了3元，每个女人花了2元，每个小孩花了1元，一共花去50元。问其中小孩有几人？2.有36个学生一起买小吃，共花钱120元，其中每个大学生花4元，每个中

31、学生花2元，每个小学生花1元，问大、中、小学生的人数分配共有多少种不同的解（去掉某类学生为0的解）？3.设某国今年的国民生产总值为 45600 亿元 , 若今后每年以 8% 的增长率增长 , 计算多少年后能实现国民生产总值翻两番 ?4.某工厂某年生产总值为3千万元，其年生产总值增长率为10%，问多少年后其生产总值会翻一翻？5.用50元钱兑换一元、两元和五元的纸币的方法有多少种？（注：一元、两元、五元的纸币数可以为0）。6.计算5元、2元和1元兑换100元的方法有多少种7.把18元钱分成一元、二元和五元的纸币且纸币数共为10张的分法有多少种？（注：在兑换中一元、二元、五元的纸币数可以为0）三、数

32、列类1.设s=1+1/2+1/3+1/n, n为正整数。编程求使S刚好超过6时的n。2.设S=1+1/2+1/3+1/N,N为正整数。编程求当算到1000项时S的值为多少?精确到小数点后两位3.求1+3+5+7+9+11+.这样的奇数之和.若累加数大于500时, 则结束累加。4.已知s=1-1/2+1/3-1/4+1/5-1/6+-1/100，求S的值。5.已知一个数列的前2项为0，1，后面各项均为前2项之和，求第40项。6.编程序求出 2+4+8+16+32+ 这样的数之和。如果累加数大于 500 时，则程序终止并输出结果。7.编程序求 1+3+5+7+9+ 这样的数之和。如果累加数大于 1

33、200 时，则程序终止并输出结果。8.编程求S=31+32+33+3209.已知 S1=1，S2=1+2，S3=1+2+3，Sn=1+2+3+n,S=S1+S2+Sn 以下程序求当n=10时，S的值.10.求s=2+(2+4)+(2+4+6)+(2+4+6+8)+，求直到s=60000为止。11.求1到1000的偶数平方和与奇数平方和之差。12.编程序求199的平方根的和并输出结果。13.编写程序,求1100所有整数的平方和。14.编写程序，求在四位数的偶数中，所有各位数字之和是30的倍数的数的和。15.编写程序，求155的平方根的和并输出结果（按四舍五入的方式保留小数点后面第两位）。16.编

34、写程序，求在四位数的奇数中，所有各位数字之和是25的倍数的数的和。17.四位数的各位数字的平方和等于100，问其中最大的一个是多少？18.编写程序，计算在0至50的范围内有多少个数，其每位数的乘积大于每位数的和。19.编写程序，求在四位数的偶数中，所有各位数字之和是30的倍数的数的和。20.编写程序，求在四位数的奇数中，所有各位数字之和是30的倍数的数的和。21.编程序求300850的平方根的和并输出结果。（保留小数点两位）22.求200，600间奇数之和。四、求阶乘类1.编程求s=1!+2!+3!+9!2.s=3!+5!+7!+.+n!，求直到s=680000为止的最大阶乘数n。3.求s=3!+5!+7!+，直到s=28000为止。4.求这样一个三位数，该三位数等于其每位数字的阶乘之和。即：abc=a!+b!+c!五、特殊类（1）回文数1.将一个数的数码倒过来得到的新数叫原数的反序数。如果一个数等于他的反序数，则称他是一个对称数。求不超过10000的最大的对称数。2.设N是一个四位数，它的9倍恰好是其反序数（例如：1234的反序数是4321），求N的值。3.编写程序，求三位数中所有回文数之和。所谓回文数，就是对正整数N从左到右读与从右到左读其结果值相同的数。如101。（2）素数4.编程求出10-1000以内按从小到大顺序排在第10位的