江苏省计算机等级考试VFP第三章归纳

江苏省计算机等级考试VFP第三章归纳 第四讲程序设计考点1程序文件的建立与执行?程序的建立或修改modify mand?程序文件的扩展名为.prg?程序文件的运行do?运行程序文件时，系统会对程序文件（.prg）进行编译，生成“伪编译”程序（.fxp）,执行程序实际上是执行.fxp文件?程序执行过程中，遇到以下命令作用?CANCEL终止程序运行，清除所有私有变量，返回到命令窗口?DO转去执行另一个程序?数据输入输出命令?格式1INPUT字符表达式TO内存变量功能该命令等待用户从键盘输入数据，当用户回车后，系统将表达式的值存入指定的内存变量注输入的数据可以是常量、变量，也可以是表达式，但不能不输入任何内容直接按回车键。 输入字符串时必须加定界符，输入逻辑型常量时要用圆点定界(如.T.,.F.)，则输入日期时间型常量时要用大括号(如xx-03-01)。 例INPUT输入二次项系数TO aINPUT“X=TO x?格式2ACCEPT字符表达式TO内存变量功能该命令等待用户从键盘输入字符串，当用户回车后，系统将表达式的值存入指定的内存变量。 注该命令只能接收字符串。 用户在输入字符串时不需要加定界符；否则，系统会把定界符作为字符串本身的一部分。 如果不输入任何内容而直接按回车键，系统会把空串赋给指定的内存变量。 例ACCEPT TOA?格式3WAIT字符表达式TO内存变量WINDOW TIMEOUT数值表达式功能该命令显示字符表达式的值作为提示信息，暂停程序的执行，直到用户按任意键或单击鼠标时继续程序运行。 注用来保存用户输入的字符，其类型为字符型。 TIMEOUT子句用来设定等待时间(秒)例WAIT“输入无效，请重输”WINDOW TIMEOUT5在VFP主窗口显示一提示窗口，显示信息“输入无效，请重输”，之后程序暂停输入，5秒后或按任意键提示窗口关闭，程序继续执行。 考点2程序基本结构?顺序结构?选择|分支结构?If?else?endif?Do case?case?Otherwise?EndCase?循环结构?For?.EndFor?Do while?EndDo?Scan?.EndScan?IFelseendif当条件为.T.时，先执行语句序列1，再执行语句序列3；当条件为.F.时，先执行语句序列2，再执行语句序列3；?IF语句可以嵌套，但不能交叉，即最先出现的if和最后出现的endif成对，最后出现的if和最先出现的endif成对例1下列程序段的输出结果是ACCEPT TOA IFA=123456S=0ENDIF S=1?S RETURNA0B1C由A的值决定D程序出错例2下列程序运行后，x的值为30，y的值为-2。 CLEAR x=26y=0IF INT(x/2)=x/2y=mod(x,3)x=x+4ENDIF IF INT(x/3)=x/3y=mod(x,-4)ENDIF?x?y例3下程序最后在屏幕显示的结果是Aone Btwo Cthree Dfour SETEXACT ONs=“ni”+SPACE (2)IF s=“ni”IF s=“ni”?“one”ELSE?“two”ENDIF ELSEIF s=“ni”?“three”ELSE?“four”ENDIF ENDIFRETURN?DO CASECASECASECASEOTHERWISEENDCASE?依次判断CASE后的条件是否成立，若某个CASE后的条件成立，则执行其后的语句序列，然后执行ENDCASE后的语句序列；若所有CASE后的条件都不成立，则执行OTHERWISE后的语句序列，然后执行ENDCASE后的语句序列。 ?只有最先成立的CASE条件后的语句序列被执行?DO CASE和ENDCASE必须成对使用例执行下列程序后，输出到屏幕上的结果为Clear Store5to a,b Store1to c,d d=b2-4*a*c Docase case d0d=300ENDCASE?d?DO WHILELOOPEXITENDDO?循环体?先判断DO WHILE后的条件是否成立，若为.T.则执行循环体，执行到ENDDO时返回DO WHILE重新判断条件是否成立，若为.T.则继续执行循环体；若为.F.则结束循环，转去执行ENDDO后的语句。 ?LOOP结束循环体的本次执行，转去DO WHILE重新判断循环条件是否成立?EXIT结束循环体的执行，转去执行ENDDO后的语句。 例1如下程序显示的结果是【13】。 s=1i=0do whilei=1twotwoSUBSTR（one，i，1）ii1ENDDO？two例3执行以下程序，屏幕显示为1015x=8DO WHILE.T.x=x+1IF x=INT(X/4)*5?x ELSELOOP ENDIFIF x10EXIT ENDIF ENDDO例4完善下列程序，使其产生10个随机的大写英文字母CLEAR i=1DO WHILEi=65AND k0y=y+x%10x=int(x/10)ENDDO?y A54321B12345C51D15考点2程序基本结构FOR循环变量=初值to终值STEP步长循环体LOOPEXIT?ENDFOR循环条件循环变量=终值(步长为负）?若循环条件成立，则执行循环体；每执行循环体，循环变量会增加一步长值，并再次判断循环条件是否成立，成立则继续执行循环体，不成立则执行ENDFOR后的语句序列。 ?步长值可正可负，默认为1.?LOOP结束循环体的本次执行，循环变量增加一个步长值，再次判断循环条件是否成立。 语句序列例1运行下列程序后显示结果为南大信管系CLEAR C=”南京大学信息管理系”FOR I=1TO LEN(C)/2IFI%20?SUBS(C,2*I-1,2)ENDIF ENDFOR例2完善下列程序以显示71000以内能被7整除、且含有数字5的所有整数（例如 35、 56、105等）。 FOR n=7TO1000step7ch=allt(str(n)IF“5”$ch?n ENDIF ENDFOR例3）完善下列程序，使程序的运行结果如右图所示。 CLEAR FOR i=1TO9FOR j=1TO9IF i0x=ASC(left(C,1)IF x127p=LEFT(c,2)+p c=SUBSTR(c,3)ELSE p=LEFT(c,1)+p c=SUBSTR(C,2)