VF程序设计基础

VF程序设计基础复习题一、填空题1.结构化程序设计有顺序结构、____________和___________３种最基本的结构。

2.命令文件的扩展名为___________ ,建立命令文件的命令为___________________，执行命令文件的命令为________。

3.在VF6.0中常用的人机交互命令有WAIT、________和_______.4._______交互命令只能接收单个字符，_______交互命令可以接收数值型和日期型数据。

5.ACCEPT命令接收的字符串长度不能超过______个字符。

6.RETURN TO MASTER命令中，TO MASTER选项的作用是___________________________。

7.３种循环结构分别为DO WHILE …ENDDO、___________和__________________。

8.过程文件中每一个过程必须以__________________语句开头，后面跟过程名。

9.打开过程文件的命令为____________，然后用_________命令调用。

10.在PRIVATE命令中可以使用通配符，通配符有两种_______和______。

11.在Visual FoxPro中参数传递的方式有两中，一种是_________，另一种是_________________。

12.说明全局变量的命令关键字是 _________ （关键字必须拼写完整）。

二、选择题1.在Visual FoxPro中，如果希望跳出SCAN…ENDSCAN循环体、执行ENDSCAN后面的语句，应使用( )A EXIT语句B BREAK语句C RETURN语句D LOOP语句2.在程序中不需要用public等命令明确声明和建立，可直接使用的内存变量是( )A 公共变量B 局部变量C 全局变量D 私有变量3.将内存变量定义为全局变量的Visual FoxPro命令是( )A LOCALB PUBLIC C PRIVATED GLOBAL4.在Visual FoxPro中有如下程序：*程序名：TEST.PRG*调用方法：DO TESTSET TALK OFFCLOSE ALLCLEAR ALLmX="Visual FoxPro"mY="二级"DO SUB1 WITH mX?mY+mXRETURN*子程序：SUB1.PRGPROCEDURE SUB1PARAMETERS mX1LOCAL mXmX=“Visual FoxPro DBMS 考试”mY="计算机等级"+mYRETURN执行命令后，屏幕的显示结果为( )A 二级Visual FoxProB 二级Visual FoxPro DBMS 考试C 计算机等级二级Visual FoxPro DBMS 考试D 计算机等级二级Visual FoxPro5.在DO WHILE……ENDDO循环结构中，EXIT命令的作用是( )A 退出过程，返回程序开始处B 终止程序执行C 终止循环，将控制转移到本循环结构ENDDO后面的第一条语句继续执行D 转移到DO WHILE语句行，开始下一个判断和循环6.在Visual FoxPro中，关于过程调用的叙述正确的是( )A 当实参的数量多于形参的数量时，多余的实参被忽略B 当实参的数量少于形参的数量时，多余的形参初值取逻辑假C 实参与形参的数量必须相等D 上面A和B都正确7.使用下列哪一个命令可以隐藏内存变量：( )A PUBLICB PRIVATEC LOCALD PUBLICALD 在程序中直接使用的内存变量不通过A，B，C说明8.在 DO WHILE … ENDDO循环结构中，LOOP命令的作用是( )A 退出过程，返回程序开始处B 终止程序执行C 终止循环，将控制转移到本循环结构ENDDO后面的第一条语句继续执行D 返回到到DO WHILE语句行，开始下一个判断和循环三、程序填空题1.有学生数据库STUDENT.DBF，其中有“编号”字段（N，2），其值从1开始。

欲按编号1、9、17、25 ……的规律抽取学生参加计算机汉字录入比赛，并在屏幕上显示参加比赛学生的编号。

请填空：SET TALK OFFUSE STUDENTDO WHILE .NOT. EOF（）IF ___________________?? 编号ENDIF______ENDDOUSESET TALK ON2.在FOXBASE+库文件SSS.DBF中按专业查询并显示该专业记录。

SET TALK OFFUSE SSSINPUT “请输入查找专业” TO ZYLOCATE FOR _______________IF .NOT.EOF( )______________ELSE?“无此专业学生”ENDIFUSESET TALK ON3.计算：1+（1+2）+（1+2+3）+…+(1+2+3+…50)SET TALK OFFX=1I=1S=1DO WHILE I<=_______I=________X=X+IS=________ENDDO?”S=”,SSET TALK OFFRETURN4.判断任一整数（>2）是否为素数。

SET TALK OFFINPUT “输入一个整数：” TO NA1=2A2=________DO WHILE A1<=A2IF _______________EXITENDIFA1=_________ENDDOIF _________? N,”是素数”ELSE? N,”不是素数”ENDIFRETURN四、写运行结果题。

1.如下FOXBASE+程序:SET TALK OFFA=“C1+C2”C1=3DO WHILE .T.C1=C1^2C2=C1*3IF C2<100LOOPELSEEXITENDIFENDDO? “A=”,&ARETURN程序的运行结果是________________2.SET TALK OFFH=10W=0DO SQS=W? S*SQ.PRGA=1DO WHILE A<=HIF INT(A/3)=A/3W=W+AENDIFA=A+1ENDDO? W,ARETURN该程序的运行结果是________________3．程序执行后显示结果为：*test.prg主程序a=5?”111”,aDo test1?”222”,aa=10?”333”,aDo test2?”444”,a*test1.prgPrivate aa=30?”test1”,aRetu*test2.prga=60?”test2”,aRetu执行 do test的运行结果是__________________.4．有FOXBASE+程序如下：*主程序名：ZCX.PRGSTORE 5 TO X1,X2,X3X1=X1+1DO CX1? X1+X2+X3RETURN*子程序一：CX1.PRGX2=X2+1DO CX2? X1+X2+X3RETURN*子程序二：CX2.PRGX3=X3+1RETURN TO MASTER命令DO ZCX执行后，屏幕上显示的结果为_______________。

5．以下两个库文件，其中库文件SEE.DBF中的记录如下：record# 学号姓名性别专业1 0004 方平男财经2 2009 李文男计算机3 1007 肖莉女财经4 1002 李林女计算机5 3020 李君男电子电工库文件 JOY.DBF中的记录如下：record# 学号数学英语1 0004 82 782 2009 72 833 1007 92 954 1002 90 935 3020 85 86SET TALK OFFSELECT 2USE JOYSELECT 1USE SEELOCATE FOR "李"$姓名XH=学号XM=姓名SELECT 2LOCATE FOR 学号=XHSX=数学? XH，XM，SXSELECT 1CONTINUEXH=学号SELECT 2CONTINUE? 学号，A->姓名，英语CLOSE ALLRETURN执行上面程序后：第一条命令“? XH，XM，SX”显示的结果是_______________________________ 。

第二条命令“? 学号，A->姓名，英语”显示的结果是______________________________。

6.当前盘当前目录下有数据库db_stock,其中有数据库表stock.dbf，该数据库表的内容是：股票代码股票名称单价交易所600600 青岛啤酒7.48 上海600601 方正科技15.20 上海600602 广电电子10.40 上海600603 兴业房产12.76 上海600604 二纺机9.96 上海600605 轻工机械14.59 上海000001 深发展7.48 深圳000002 深万科12.50 深圳执行下列程序段以后，内存变量a的内容是( ) CLOSE DATABASEa=0USE stockGO TOPDO WHILE.NOT.EOF(IF 单价>10a=a+1ENDIFSKIPENDDOA 1B 3C 5D 77.如下程序显示的结果是 _________ 。

s=1i=0do while i<8s=s+ii=i+2enddo?s1.如下程序的输出结果是 _________.i=1DO WHILE i<10i=i+2ENDDO?iRETURN2.阅读下列程序，并填写运行结果。

SET TALK OFFCLEARSTORE 1 TO XSTORE 20 TO YDO WHILE X<=YIF INT(X/2)<>X/2X=1+X^2Y=Y+1LOOPELSEX=X+1ENDIFENDDO?X?YSET TALK ONRETURN运行结果X的值是_______ ，Y的值是________ 。

五、改错题1.程序功能:编写删除职工档案(ZG.DBF) 库中的任意记录的程序.其结构如下:姓名(C)、编号(C)、籍贯(C)等字段.程序有三处错误,请改正之)。

注意:不得增行或删行,也不得更改程序的结构.SET TALK OFFUSE ZGDO WHILE .T.ACCEPT “输入待删除职工的编号:” TO BHLOCA FOR 编号=&BHIF .NOT. EOF( )?“无此编号”ELSEDISPWAIT “是否删除该记录？” TO P1IF UPPER(P1) =“Y”DELEENDIFENDIFWAIT “是否继续删除记录？” TO P2IF UPPER(P2) =“Y”EXITENDIFENDDOPACKUSESET TALK ONRETU2六、编程题。