第8章程序设计基础2

《第8章程序设计基础2》由会员分享，可在线阅读，更多相关《第8章程序设计基础2（49页珍藏版）》请在文档大全上搜索。

1、1Visual Foxpro程序设计程序设计第第8章程序设计基础章程序设计基础本章主要内容本章主要内容8.1 程序设计的基本概念与步骤程序设计的基本概念与步骤8.2 程序中的常用命令程序中的常用命令 8.3 程序控制结构程序控制结构8.4 多模块程序设计多模块程序设计总页第2页8.3.3 循环结构程序设计循环结构程序设计在程序设计中，经常需要对某一个程序段（即在程序设计中，经常需要对某一个程序段（即一条或多条命令）反复执行，这种程序结构称为循一条或多条命令）反复执行，这种程序结构称为循环结构。环结构。 循环结构的特点是：当给出的循环条件为真时，循环结构的特点是：当给出的循环条件为真时，反复执行

2、一组命令，这组被重复执行的命令序列称反复执行一组命令，这组被重复执行的命令序列称为循环体。当循环条件为假时，则终止循环体的执为循环体。当循环条件为假时，则终止循环体的执行。循环结构也就是由循环条件控制循环体是否重行。循环结构也就是由循环条件控制循环体是否重复执行的一种语句结构，它可以简化程序，提高程复执行的一种语句结构，它可以简化程序，提高程序效率。常用的循环语句有以下几种形式：序效率。常用的循环语句有以下几种形式：条件型循环：条件型循环：DO WHILEENDDODO WHILEENDDO计数型循环计数型循环：FORTOENDFORFORTOENDFOR扫描型循环：扫描型循环：SCANEND

3、SCANSCANENDSCAN总页第3页一、条件循环一、条件循环条件循环是根据条件表达式的值，决定循环体内语句的执条件循环是根据条件表达式的值，决定循环体内语句的执行次数，也称为当型循环。一般用于未知循环次数的循行次数，也称为当型循环。一般用于未知循环次数的循环。环。【格式】【格式】DO WHILE LOOP EXIT ENDDO【功能】【功能】 语句执行时，先判断语句执行时，先判断 的值，若为真，的值，若为真，则执行循环体内的命令，即则执行循环体内的命令，即DO DO 与与ENDDOENDDO之间的命令；若之间的命令；若为假，则执行为假，则执行ENDDOENDDO后面的命令。后面的命令。总页

4、第4页【说明】【说明】1.DO WHILE 1.DO WHILE 和和ENDDOENDDO要配对使用；要配对使用；2.DO WHILE 2.DO WHILE 是循环语句的入口，是循环语句的入口， 一般为逻辑型，一般为逻辑型， ENDDOENDDO是循环语句的出口，中间是循环语句的出口，中间 是重复执行的循环体；是重复执行的循环体；3.LOOP3.LOOP和和EXITEXIT只能在循环体中使用，是循环跳转和控制语句。其中只能在循环体中使用，是循环跳转和控制语句。其中LOOPLOOP是转到循环的入口语句，是转到循环的入口语句，EXITEXIT是强行退出循环的语句，它们一是强行退出循环的语句，它们一

5、般都放在分支结构中；般都放在分支结构中；4.4.循环结构允许嵌套。这种嵌套不仅限于循环结构自身的嵌套，而且循环结构允许嵌套。这种嵌套不仅限于循环结构自身的嵌套，而且还可以是和选择结构的相互嵌套；还可以是和选择结构的相互嵌套；5.5.循环一般要有退出机制，否则，会形成死循环。循环一般要有退出机制，否则，会形成死循环。总页第5页条件循环流程图条件循环流程图无跳转流程图无跳转流程图跳转及控制流程图跳转及控制流程图总页第6页例：例：编写程序，其功能是循环查找学编写程序，其功能是循环查找学生姓名，并根据用户选择确定是否继生姓名，并根据用户选择确定是否继续查找。续查找。CleaCleause use 学生

6、学生Do while .t.Do while .t.cleacleatexttext根据姓名查找记录根据姓名查找记录endtextendtext? ?accepaccep请输入查询学生姓名请输入查询学生姓名: to xm: to xmLoca for Loca for 姓名姓名=xm=xmif found()if found()row()+1,15 say row()+1,15 say 学号学号get get 学号学号row(),30 sayrow(),30 say姓名姓名get get 姓名姓名row()+1,15sayrow()+1,15say性别性别 get get 性别性别row(),

7、30sayrow(),30say出生日期出生日期get get 出生日期出生日期elseelse?查无查无+xm+xm+姓名姓名!EndifEndifwait wait 是否继续查询是否继续查询?(Y/N) ?(Y/N) to cx window at 20,10 to cx window at 20,10 if uppe(cx)=Yif uppe(cx)=YlooploopelseelseexitexitendifendifenddoenddouseuseSet talk onSet talk onreturnreturn总页第7页二、计数型循环语句二、计数型循环语句计数型循环语句适用于循环

8、次数已知的情况下，它是根据用计数型循环语句适用于循环次数已知的情况下，它是根据用户设置的循环变量的初值、终值和步长来决定循环体的执户设置的循环变量的初值、终值和步长来决定循环体的执行次数。计数型循环语句又称行次数。计数型循环语句又称FORFOR循环语句。循环语句。【格式】【格式】 FOR FOR = TO TO STEP STEP LOOP LOOP EXIT EXIT ENDFOR | NEXT ENDFOR | NEXT【功能】【功能】通过比较通过比较 与与 来决定是否执行来决定是否执行 。执行。执行FORFOR语句时，首先将循环初值赋给循环变量，语句时，首先将循环初值赋给循环变量，然后将

9、循环变量与循环终值比较，当然后将循环变量与循环终值比较，当 为正数时，若为正数时，若 的值不大于的值不大于 ，执行循环体；当，执行循环体；当 为为负数时，若负数时，若 的值不小于的值不小于 ，执行循环体。，执行循环体。一旦遇到一旦遇到ENDFORENDFOR或或NEXTNEXT语句，语句， 值自动加上值自动加上 ，然后返回到，然后返回到FORFOR语句，重新与语句，重新与 进行比较。直到进行比较。直到循环变量大于或小于循环终值时，结束循环。步长的默认循环变量大于或小于循环终值时，结束循环。步长的默认值为值为1 1。总页第8页【说明】【说明】1.1.步长值省略时，系统默认步长值为步长值省略时，系

10、统默认步长值为1 1。当初值小于终值时，。当初值小于终值时，步长值为正值；当初值大于终值时，步长值为负值。步步长值为正值；当初值大于终值时，步长值为负值。步长值不能为长值不能为0 0，否则造成死循环；，否则造成死循环；2.2.在循环体内不要随便改变循环变量的值，否则会引起循在循环体内不要随便改变循环变量的值，否则会引起循环次数发生改变；环次数发生改变；3.LOOP3.LOOP和和EXITEXIT命令的功能和用法与条件循环中该命令命令的功能和用法与条件循环中该命令的用法相同。的用法相同。 总页第9页计数循环流程图计数循环流程图总页第10页例：例：编写程序，其功能是用计编写程序，其功能是用计数循环

11、统计学生表中入校总分数循环统计学生表中入校总分在在570570分以上的学生人数。分以上的学生人数。CleaCleaSet talk offSet talk offuse use 学生学生coun to zrscoun to zrsrs=0rs=0list for list for 入校总分入校总分=570=570go topgo topfor i=1 to zrsfor i=1 to zrsif if 入校总分入校总分=570=570rs=rs+1rs=rs+1endifendifskipskipendforendfor?入校总分不低于入校总分不低于570570的学的学生人数是：生人数是：,r