XXXX年第6章程序设计基础合集课件.ppt

《XXXX年第6章程序设计基础合集课件.ppt》由会员分享，可在线阅读，更多相关《XXXX年第6章程序设计基础合集课件.ppt（45页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、程序设计基础第六章泉矿棕雹乱润静瞪忠鹃累躯哲般径处腊吸钟属赢抖锭舔殿滇鄂政纳樟瓤实XXXX年第6章程序设计基础XXXX年第6章程序设计基础 本章要点本章要点6.1 程序6.2 选择结构6.3 循环结构涩密猴僵泰裹导致月料叁醉烛块淤炮快誉胜域惩滁入篷洼酉桓辙篡势抡帆XXXX年第6章程序设计基础XXXX年第6章程序设计基础程序设计的概念VFP有两种工作方式：交互方式和程序方式。交互方式是在命令窗口中直接输入命令或通过选择菜单来执行VFP命令。但在实际应用中，许多任务是要执行一组命令来完成的。如果采用在命令窗口中逐条输入命令的方式进行，不仅效率不高，而且容易出错。特别是当该任务要反复执行，或者当处理

2、的问题较复杂时，这种交互方式几乎是不可行的，应当采用程序方式。诀祷罢亏豁斗罗灿蓝采驴缠逸罢粉叁任胰隶咋晾棠声椎涡菜舒皮掖滥蓬袜XXXX年第6章程序设计基础XXXX年第6章程序设计基础6.1 程序程序是能够完成指定任务的命令序列。将这组命令序列以文件形式保存，该文件称为程序文件或命令文件。在运行程序时，系统将按照一定的次序自动执行其中的各条命令，从而实现通过程序控制自动执行一系列操作，以完成指定任务。凡三宪疵虎赚柔槛申嗅虐襟燥贫烧内趣匪饥连裤掇褪帘酉烷哎担益产掺湾XXXX年第6章程序设计基础XXXX年第6章程序设计基础程序文件的基本操作程序文件的基本操作一、程序文件的建立和编辑一、程序文件的建立

3、和编辑命令格式：命令格式：modi comm modi comm 功能：建立或修改指定的程序文件。功能：建立或修改指定的程序文件。说明：说明：（1 1）系统默认的程序文件扩展名为）系统默认的程序文件扩展名为.prg（2）若若用用户户指指定定了了，执执行行该该命命令令时时，系系统统首首先先检检索索磁磁盘盘文文件件，如如果果此此文文件件存存在在，则则打打开开该该文文件件，若若指指定定文文件件不不存存在在，则则建建立立一一个个新新的的空空程程序序文件，其文件名即为指定的文件，其文件名即为指定的。笆曰渔洗相童狐悉先错箭灭擦讯霄拈倦人翻锑僧柔霉剧统肖纸激咋冈诱馏XXXX年第6章程序设计基础XXXX年第6

4、章程序设计基础二、保存命令文件二、保存命令文件(ctrl+w)(ctrl+w)三、运行命令文件三、运行命令文件(do(do 文件名文件名)呐闹鸟溶结火班低琅江戌钦辕秦瘴毙稚德择圣营览渭氨秦裴瀑澡宣事孩笋XXXX年第6章程序设计基础XXXX年第6章程序设计基础例如例如6.1 统计第一学期有考试成绩的学生人数与平均成绩统计第一学期有考试成绩的学生人数与平均成绩设置步骤设置步骤:（1 1）创建文件：）创建文件：modi comm MyProg1modi comm MyProg1（2）编写代码）编写代码（3）保存文件）保存文件（4）结束编程）结束编程（5）调试、运行程序，直到程序完全正确）调试、运行程

5、序，直到程序完全正确申幼抨圃袒逛挤汹等桌章置呐批肪象乐听朗暑炳坠境琳鼎葛笨曰醒箔冠酒XXXX年第6章程序设计基础XXXX年第6章程序设计基础8常用命令常用命令1.程序注释语句：格式一：格式一：NOTE 格式二：格式二：*格式三：格式三：&拿肩蓬封伟靳酷翱铸犀躇药嗜鄂狙乔勺牺俞傲乙绸作援逆犯逊贾拇超始礁XXXX年第6章程序设计基础XXXX年第6章程序设计基础92.RETURN命令格式：命令格式：return 功能：终止本程序的执行，把程序控制权返回给本功能：终止本程序的执行，把程序控制权返回给本程序的调用者。程序的调用者。如果一个程序中没有包含如果一个程序中没有包含return命令，当执行完本程

6、命令，当执行完本程序最后一条命令后，系统同样也把程序控制权返回序最后一条命令后，系统同样也把程序控制权返回给本程序的调用者。给本程序的调用者。趋检寓梁质褐隐翅蘑扣搅桥怀冕酋酥奉花湿肝荐荒揍萄辞容逾苑进匿喷失XXXX年第6章程序设计基础XXXX年第6章程序设计基础3 3、输入输出命令输入输出命令(交互式命令交互式命令)程序的正确运行，必然需要操作人员与内程序的正确运行，必然需要操作人员与内存变量之间进行信息交流。存变量之间进行信息交流。VFP提供了许多进提供了许多进行这类数据交流的命令。行这类数据交流的命令。尔贤玖疫躺凡眷眷砖米赐效弥默员惜替乓敏颗江揭喘十饲齐柴梧点诅彦斡XXXX年第6章程序设计

7、基础XXXX年第6章程序设计基础ACCEPT语句语句语句格式：语句格式：ACCEPT ACCEPT to to 执行该命令时，暂停程序的运行，显示命令中的字执行该命令时，暂停程序的运行，显示命令中的字符表达式作为提示信息，等待用户从键盘输入字符串。符表达式作为提示信息，等待用户从键盘输入字符串。系统将接受的字符串存入指定的内存变量，程序继续系统将接受的字符串存入指定的内存变量，程序继续运行。运行。功能说明：功能说明：系统将用户的输入一律作为字符串，输入时不必加系统将用户的输入一律作为字符串，输入时不必加定界符，以回车结束输入；定界符，以回车结束输入；可选的提示信息可以是字符型常量、变量或表达式

8、。可选的提示信息可以是字符型常量、变量或表达式。如果是字符串常量，则必须使用字符串定界符。如果是字符串常量，则必须使用字符串定界符。例如例如:查询指定学生的信息（文件名例查询指定学生的信息（文件名例6-1）咐闲懦皇藤放遣糜菇栽皂忻旭折藐荷揖绵樱壬消萎甄课滤燎盎瞧那酸恨征XXXX年第6章程序设计基础XXXX年第6章程序设计基础INPUT语句语句语句格式：语句格式：INPUT INPUT to to 功能注释：功能注释：用户输入的数据可以是数值型、逻辑型、日期型、用户输入的数据可以是数值型、逻辑型、日期型、日期时间型或字符型，以回车结束输入；日期时间型或字符型，以回车结束输入；输入字符串时必须加定

9、界符；输入逻辑型常量时输入字符串时必须加定界符；输入逻辑型常量时要用圆点定界，如（要用圆点定界，如（.T.,.F.T.,.F.）；输入日期型常量时要）；输入日期型常量时要用大括号，如用大括号，如1962/06/121962/06/12；INPUTINPUT命令一般是用来输入数值型数据。命令一般是用来输入数值型数据。例如例如:查询指定年份出生的学生的信息查询指定年份出生的学生的信息(文件名例文件名例6-2)6-2)界幕祟沙宋嘻边璃滤丹抉镭酞断进董梆喜躬限卸逃妮今棕胳啮葡谨曝十溢XXXX年第6章程序设计基础XXXX年第6章程序设计基础13常用命令常用命令4.4.设置是否输出非显示命令的执行结果设置

10、是否输出非显示命令的执行结果 命令格式：命令格式：SETSETTALKTALKONONOFFOFF 功能：功能：VFPVFP在执行一些非显示命令（如在执行一些非显示命令（如SELESELE命令）命令）时，将把执行结果等信息送到时，将把执行结果等信息送到VFPVFP主窗口、状态栏或主窗口、状态栏或用户自定义窗口里。可使用开关用户自定义窗口里。可使用开关SET TALK ON/OFF SET TALK ON/OFF 显示或关闭这些提示信息。显示或关闭这些提示信息。如在例如在例6.16.1的程序的第一行加上命令的程序的第一行加上命令 SET TALK SET TALK ONON，对比其运行结果。，对

11、比其运行结果。吴浚挞鼻削既泊涝命撇唬氏预五窍照勾燃踞烯看妖啃番狞怪断湘绑脆杭呀XXXX年第6章程序设计基础XXXX年第6章程序设计基础结构化程序的基本结构结构化程序的基本结构一、顺序结构一、顺序结构 分析书例分析书例6.3(myprog2)6.3(myprog2)二、选择结构二、选择结构三、循环结构三、循环结构 涝么腊率椅雍侣序债朴成有歌掠壤徽铭汹窍咙俱砚班暖圈捞同迭庶综跳岩XXXX年第6章程序设计基础XXXX年第6章程序设计基础 6.2 6.2 选择结构选择结构1 1、条件语句（、条件语句（IFENDIFIFENDIF）2 2、IFFIFF函数函数3 3、IFIF语句的嵌套语句的嵌套4 4、

12、分支语句、分支语句(DO CASEENDCASE)(DO CASEENDCASE)价粘曳涯氏宫凋波渭匿搪色唤丫懦总军辊水租巷怠松疚蚁涯僧柄钻哉酪烟XXXX年第6章程序设计基础XXXX年第6章程序设计基础1 1、条件语句、条件语句语句格式：语句格式：IF IF 1 ELSE ELSE 2 ENDIF ENDIF是是逻逻辑辑表表达达式式。当当程程序序执执行行到到IF语语句句时时，首首先先判判断断是是否否成成立立。如如果果为为“真真”时时，则则执执行行语语句句，否否则则（即即为为“假假”）执执行行。IF语语句句执执行行完完毕毕后后，再再执执行行ENDIF后面的语句。后面的语句。屯单岭涧存物桥踊讫渍蛊

13、椰讽穿俗造猿傅目夯为献某蘑厨诡卖戳龋掩朔坑XXXX年第6章程序设计基础XXXX年第6章程序设计基础选择结构中可以没有选择结构中可以没有ELSE部分。这样的话，当程序部分。这样的话，当程序执行到执行到IF语句时，首先判断语句时，首先判断是否成立。如果是否成立。如果为为“真真”时，则执行时，则执行语句，否则直接语句，否则直接转向转向ENDIF后面的语句去执行。后面的语句去执行。IF和和ENDIF必须成对出现，必须成对出现，IF是该结构的入口，是该结构的入口，ENDIF是该结构的出口。是该结构的出口。IF语句只能在程序中使用，不能在命令窗口中使用语句只能在程序中使用，不能在命令窗口中使用为了使程序的

14、结构层次清晰、减少编写错误，增加为了使程序的结构层次清晰、减少编写错误，增加程序的可读性，一般按缩进程序的可读性，一般按缩进(锯齿形锯齿形)格式书写。即将格式书写。即将该结构的入口和出口语句写在同一纵坐标位置上，而该结构的入口和出口语句写在同一纵坐标位置上，而将嵌套其中的其他结构语句向右缩若干格。将嵌套其中的其他结构语句向右缩若干格。袍抢利蓑抡垃裕贡揭备苔辑业婴疚烙畸窿赋陵闸版鸯桐肯缠批老际鲁尺谬XXXX年第6章程序设计基础XXXX年第6章程序设计基础IF语句举例语句举例1CLEARinput 请输入一个数：请输入一个数：TO xIF MOD(x,2)=0 THEN y=是偶数。是偶数。ELS

15、E y=是奇数。是奇数。ENDIF?STR(x)+yRETURN判判断断从从键键盘盘输输入入的的任任何何一一个个整整数数的的奇奇偶偶。若若不不是是整数，则取整判断。整数，则取整判断。伶腐跪辽歪敷棘凌登歹饼移寸丰轰礁亭臭痉醇挽牡街禁阮孩缝诽禹毕随筏XXXX年第6章程序设计基础XXXX年第6章程序设计基础2 2、IFFIFF函数函数格式：格式：IIF(IIF(,2）说明说明:是逻辑表达式。当是逻辑表达式。当为为“真真”时，时，该表达式的返回值为该表达式的返回值为，否则，否则,该表达式的该表达式的返回值为返回值为,。如：如：z=IIF(x=y,x,y)，将返回将返回x与与y中的较大者中的较大者作为函

16、数的返回值，并赋给作为函数的返回值，并赋给z。扼样歉汁撤尖弊姬玛鼠牢袄气碎透袒模曲朱铆霹鸭摄洛灯探佰沁有窟撇李XXXX年第6章程序设计基础XXXX年第6章程序设计基础 IIF函函数数的的功功能能和和IF-ELSE-ENDIF语语句句非非常常相相似似，可可以以用用IF语语句句取取代代IIF函函数数，如如IIF(x=y,x,y)可可用用如如下下IF语句取代。语句取代。IF x=y z=x ELSE z=y ENDIF有些有些IF语句也可以用语句也可以用IIF函数代替，但不是所有的。函数代替，但不是所有的。泞贰卓催灰酵射笋命壤牌货瞒乘溜屏泞污潘挽沪巴华卑幸坟僻辑突僻恨顾XXXX年第6章程序设计基础X

17、XXX年第6章程序设计基础如，判断数的奇偶性程序中的如，判断数的奇偶性程序中的IF语句语句 IF MOD(x,2)=0 THEN y=是偶数。是偶数。ELSE y=是奇数。是奇数。ENDIF 相当于相当于IIF(mod(x,2)=0,”是偶数是偶数”,“是奇数是奇数”）昼否痊缝肺熄丰辞臆纲耗跨莉和偏些驹败伎钠仙酷虽评武熊扯必旧铃义功XXXX年第6章程序设计基础XXXX年第6章程序设计基础3 3、IFIF语句的嵌套语句的嵌套 VFP对选择结构中的命令或语句没有特别的规对选择结构中的命令或语句没有特别的规定或限制，只要是合法的定或限制，只要是合法的VFP命令或语句就行。命令或语句就行。IF语句也是

18、合法的语句也是合法的VFP语句，因此，在语句，因此，在IF语句内部也语句内部也可以包含可以包含IF语句，这就是语句，这就是IF语句的嵌套。语句的嵌套。蝗深焕肺舔绦嗓馏淫氢卤俏卧测娘谦拌邻辐世扳砂杉桨埃梅纳船邪叉何罪XXXX年第6章程序设计基础XXXX年第6章程序设计基础IF的嵌套语句举例的嵌套语句举例CLEARinput 请输入一个数：请输入一个数：TO xIF INT(X)=X IF MOD(x,2)=0 THEN y=是偶数。是偶数。ELSE y=是奇数。是奇数。ENDIF?STR(x)+yELSE?输入的数不是整数。输入的数不是整数。ENDIFRETURN判判断断从从键键盘盘输输入入的的

19、任任何何一一个个数数的的奇奇偶偶性性。若若不不是是整整数数，则则显显示示“输输入入的的数数不不是是整整数数”。规戴詹晴尼漠剔当候伶钾失接魏不归赵拦惋寸剖河勺柯动购砸赁肠瞧澜痰XXXX年第6章程序设计基础XXXX年第6章程序设计基础4 4、分支语句、分支语句语句格式：语句格式：DO CASE DO CASE CASE CASE 1 1 CASE CASE 2 2 CASE CASE N N OTHERWISE OTHERWISE N+1 ENDCASE ENDCASE功能：功能：根根据据n个个条条件件表表达达式式的的逻逻辑辑值值，选选择择执执行行n+1个个语语句句序序列列中中的的一一个。个。筑折

20、枝剑诡碧快嚷喻甚数贤腾臃愚跑兄幕肚疯矾芥帮矽食仿崩宵柑月珐底XXXX年第6章程序设计基础XXXX年第6章程序设计基础说明：说明：1当系统执行当系统执行DO CASEENDCASE语句时，依次判语句时，依次判断断CASE后面的条件是否成立，当发现某个后面的条件是否成立，当发现某个CASE条件条件成立时，就执行该成立时，就执行该CASE与下一个与下一个CASE之间的语句序之间的语句序列，然后跳出列，然后跳出DO CASE结构，转去执行结构，转去执行ENDCASE后后面的语句。如果所有面的语句。如果所有CASE条件都不成立条件都不成立,则执行则执行OTHERWISE与与ENDCASE之间语句序列，然

21、后执行之间语句序列，然后执行ENDCASE后面的语句。后面的语句。2DO CASE结构中可以没有结构中可以没有OTHERWISE部分。这样部分。这样的话，当所有的话，当所有CASE条件都不成立时，就直接跳出条件都不成立时，就直接跳出DO CASE结构，转去执行结构，转去执行ENDCASE后面的语句后面的语句.毁皿秋锁桓碎派彝个送搅秦士希遇骋嚏樱兴撇街展屠悄贾穆行砒棒负鞭蹦XXXX年第6章程序设计基础XXXX年第6章程序设计基础3不管有几个不管有几个CASE条件成立，只有最先成立的那个条件成立，只有最先成立的那个CASE条件后的语句序列被执行。条件后的语句序列被执行。4DO CASE和和ENDC

22、ASE必须成对出现，必须成对出现，DO CASE是该结构的入口，是该结构的入口，ENDCASE是该结构的出口。是该结构的出口。DO CASE与第一个与第一个CASE项之间不能有任何语句。项之间不能有任何语句。5与与IF语句一样，语句一样，DO CASE语句只能在程序中使用，语句只能在程序中使用，不能在命令窗口中使用。不能在命令窗口中使用。6DO CASE结构一般按缩进格式书写。结构一般按缩进格式书写。动搽骑书较店览铱颓徒夸偷根摈菇掂闹匙魂淹早敖剧胚滨妮真兹溜勤戌牛XXXX年第6章程序设计基础XXXX年第6章程序设计基础CASE语句举例语句举例CLEARinput 请输入一个数：请输入一个数：T

23、O xDO CASE CASE INT(X)!=X?输入的数不是整数输入的数不是整数 CASE MOD(x,2)=0?该数是偶数。该数是偶数。CASE MOD(x,2)=0 y=该数是奇数。该数是奇数。ENDCASERETURN判判断断从从键键盘盘输输入入的的任任何何一一个个数数的的奇奇偶偶性性。若若不不是是整整数数，则则显显示示“输输入入的的数数不不是是整整数数”。抒梯送吃错酗走层鉴损汲爱娜呼雨纽防饼镑始珊暮来冗挎励捌瓮陶倒赋世XXXX年第6章程序设计基础XXXX年第6章程序设计基础6.3 循环结构循环结构 循环是程序设计中的一种重要的方法。循环就是循环是程序设计中的一种重要的方法。循环就是

24、程序在执行的过程中，其中的某段代码被重复执行程序在执行的过程中，其中的某段代码被重复执行若干次。被重复执行的这段代码称为循环体。若干次。被重复执行的这段代码称为循环体。VFP中支持循环结构的语句包括：中支持循环结构的语句包括：（1）DO WHILE-ENDDO （2）FOR-ENDFOR （3）SCAN-ENDSCAN舅猴购秉歉寇巳烟烂涌衔烷禽妒傅拾羹睁免黎以侧铰汀撰肥业贵滔嘿促蚊XXXX年第6章程序设计基础XXXX年第6章程序设计基础DO WHILE语句格式：语句格式：DO WHIL DO WHIL 1 LOOP LOOP 2 EXIT EXIT 3 ENDDO ENDDO恼伟砂抠缄蒸港榴致

25、陇沮倍蘸泽股焦纵矛顺砚捶拆腑兔喀去察傣囊该盒倔XXXX年第6章程序设计基础XXXX年第6章程序设计基础 当系统执行进入当系统执行进入DO WHILE结构时，首先判断结构时，首先判断循环条件是否成立。如果循环条件成立，则执行循环条件是否成立。如果循环条件成立，则执行DO WHILE与与ENDDO之间语句序列（即循环体）。当之间语句序列（即循环体）。当执行到执行到ENDDO时，返回到时，返回到DO WHILE，再次判断，再次判断循环条件是否成立，以确定是否再次执行循环体，循环条件是否成立，以确定是否再次执行循环体，如此循环，直到循环条件不成立，结束该循环语句，如此循环，直到循环条件不成立，结束该循

26、环语句，执行执行ENDDO后面的语句。后面的语句。欠零螟奏宅露璃炼赢俩岸件桅羹令珊镶倡榨摩滴逆巍萝菠它掂铰帐丈妄韩XXXX年第6章程序设计基础XXXX年第6章程序设计基础 循环体中可以使用两条特殊的命令：循环体中可以使用两条特殊的命令：LOOP命命令和令和EXIT命令。命令。如果循环体包含有如果循环体包含有LOOP命令，那么当执行到命令，那么当执行到LOOP命令时，就结束本次循环（如同执行到命令时，就结束本次循环（如同执行到ENDDO一样），即不再执行一样），即不再执行LOOP到到ENDDO之之间的语句，返回间的语句，返回DO WHILE处再判断循环条件是处再判断循环条件是否成立。否成立。如果

27、循环体包含有如果循环体包含有EXIT命令，那么当执行到命令，那么当执行到EXIT命令时，就立即结束该循环语句，执行命令时，就立即结束该循环语句，执行ENDDO后面的语句。后面的语句。鲁铃捉获扰找驼圭戎郧颠椽惧段畅疆概褐棋淑惋捐晚赡赋询豺阻擦靖淀斡XXXX年第6章程序设计基础XXXX年第6章程序设计基础说明：说明：1ENDDO必须与必须与DO WHILE成对出现，缺一不可成对出现，缺一不可2LOOP命令和命令和EXIT命令只能用在循环结构中，通命令只能用在循环结构中，通常出现在循环体内嵌套的选择语句中。常出现在循环体内嵌套的选择语句中。3避免陷入避免陷入“死循环死循环”。循环体中必须包含能对。循

28、环体中必须包含能对产生影响的命令，否则，若产生影响的命令，否则，若的值永远为的值永远为真（真（.T.），循环将不会结束。这种现象称为），循环将不会结束。这种现象称为“死循死循环环”。察祭贿敷员始悸驹踌货罕陈刻玫酒洒稠跳眉秤苞刽封娩诸读膨惑帖诊尔囊XXXX年第6章程序设计基础XXXX年第6章程序设计基础4为了增加程序的可读性，一般按缩进格式书写。为了增加程序的可读性，一般按缩进格式书写。5与与IF语句一样，语句一样，DO WHILE语句只能在程序中语句只能在程序中使用，不能在命令窗口中使用。使用，不能在命令窗口中使用。歧感适察玩咏詹垛株河构康蓬赣痉茎零际谬惨温入作找蟹遗听痪峻诛秆廖XXXX年第6

29、章程序设计基础XXXX年第6章程序设计基础DO WHILE语句举例语句举例1例例 计算计算1+2+3+1001+2+3+100的结果的结果 clear clear s=0 s=0 i=1 i=1 do while i=100 do while i=100 s=s+i s=s+i i=i+1 i=i+1 enddo enddo?”s=”,s?”s=”,s return return循环过程的分析循环过程的分析:第第1次次:(条件条件i=1满足循环满足循环)S=1 i=2第第2次次:(条件条件i=2满足循环条件满足循环条件)S=3 i=3第第100次次:(条条件件i=100满满足足循循环环条条件件

30、)S=5050 i=101第第101次次:(条条件件i=101,不不满满足足循循环环条件条件,退出退出)计算计算1+3+99clearclears=0s=0i=1i=1do while i=100do while i=100 s=s+i s=s+i i=i+2 i=i+2enddo enddo 宣阅粪胃啼协然取华伴僵剑瞅任棉纫透卧化亚二寸阐涂琉阶冠稿甚嚎不膝XXXX年第6章程序设计基础XXXX年第6章程序设计基础二、二、FOR-ENDFOR FOR-ENDFOR循环语句循环语句 如如 果果 事事 先先 可可 以以 决决 定定 循循 环环 的的 次次 数数,使使 用用 FOR-ENDFOR语句更

31、加清晰、方便。语句更加清晰、方便。语句格式：语句格式：FOR FOR=TO TO STEP STEP 1 LOOP LOOP 2 EXIT EXIT 3 ENDFOR/NEXT ENDFOR/NEXT骄孤行抢计稽误颊讣手赦轻荡毖惯狂餐子巍凝盐鳞萤磊狼狡镜儡逃官娄窜XXXX年第6章程序设计基础XXXX年第6章程序设计基础 当系统执行进入当系统执行进入FOR循环结构时，首先将初值赋循环结构时，首先将初值赋给循环变量，再将循环变量的值与终值比较，判断循给循环变量，再将循环变量的值与终值比较，判断循环条件是否成立。如果循环变量的值在初值与终值范环条件是否成立。如果循环变量的值在初值与终值范围内，表示循

32、环条件成立，则执行围内，表示循环条件成立，则执行FOR与与ENDFOR之间的语句序列（即循环体），然后循环变量的值增之间的语句序列（即循环体），然后循环变量的值增加一个增量，并再次判断循环条件是否成立，以确定加一个增量，并再次判断循环条件是否成立，以确定是否再次执行循环体。若循环变量的值已超出初值与是否再次执行循环体。若循环变量的值已超出初值与终值范围，表示循环条件不成立，则结束该循环结构，终值范围，表示循环条件不成立，则结束该循环结构，执行执行ENDFOR后面的语句。后面的语句。绢曳义庚弯误少拐俞瞳君绞馈诚岸几原蜡粹狮濒漱谷绥吻沼侠磁蒙畜摄中XXXX年第6章程序设计基础XXXX年第6章程序设

33、计基础说明：说明：1ENDFOR和和NEXT是等价的。是等价的。2FOR、ENDFOR或或NEXT成对出现，缺一不可。成对出现，缺一不可。3、都可以是数值表达式都可以是数值表达式,但它们仅在控制进入循环结构时被计算一次但它们仅在控制进入循环结构时被计算一次,而在整而在整个循环语句的执行过程中不再改变。个循环语句的执行过程中不再改变。4是描述循环快慢的量，可以是正值，即递是描述循环快慢的量，可以是正值，即递增，也可以是负值，即递减。当增量为增，也可以是负值，即递减。当增量为1时，时，STEP可可以省掉。若增量为正值，则当循环变量的值小于等于以省掉。若增量为正值，则当循环变量的值小于等于终值时，循

34、环条件成立；若增量为负值，则当循环变终值时，循环条件成立；若增量为负值，则当循环变量的值大于等于终值时，循环条件成立量的值大于等于终值时，循环条件成立5可以在循环体内改变循环变量的值，但循环次数可以在循环体内改变循环变量的值，但循环次数也随之改变。也随之改变。佬中阀鲁鞭参祭浮祭挖婚伦挨枢谊量瞻卿掳柒宙铆痕帛割啪卓篙迸卯狸焦XXXX年第6章程序设计基础XXXX年第6章程序设计基础FOR语句举例语句举例例例 计算计算1+2+3+1001+2+3+100的结果的结果 clear clear s=0 s=0for i=1 to 100for i=1 to 100 s=s+i s=s+i endfor

35、endfor?”s=”,s?”s=”,s return return循环过程的分析循环过程的分析:第第1次次:(i=1满足满足i100循环条件循环条件)S=1 i=2第第2次次:(i=2满足满足i100循环条件循环条件)S=3 i=3第第100次次:(i=100满足循环条件满足循环条件)S=5050 i=101第第101次次:i=101,不不满满足足循循环环条条件件,退退出出循循环环,执执行行?”s=”,s语句语句 醇烂钮彤贺壤自汁导曹舰滑保阅有倔甫砷颇夏床驾最桅窄烽府酞盎夹盗鸿XXXX年第6章程序设计基础XXXX年第6章程序设计基础三、循环语句三、循环语句SCAN-ENDSCANSCAN-E

36、NDSCAN 如如果果需需要要对对数数据据表表指指定定的的若若干干记记录录依依次次执执行行相相同同的的操操作，使用作，使用SCAN-ENDSCAN语句更加清晰、方便。语句更加清晰、方便。语句格式：语句格式：SCAN SCAN FORFORWHILE WHILE （语句行序列）（语句行序列）LOOP LOOP （语句行序列）（语句行序列）EXIT EXIT （语句行序列）（语句行序列）ENDSCANENDSCAN锣杂稻疯蔫垣懦表庞帽谢凡谱券滞邻硬恳钩龚羽木印揪们彦安脖娩终耍膝XXXX年第6章程序设计基础XXXX年第6章程序设计基础 当系统执行进入当系统执行进入SCAN循环结构时，记录指针自循环结

37、构时，记录指针自动、依次地在当前数据表的指定范围内满足条件的动、依次地在当前数据表的指定范围内满足条件的记录上移动，对每一条记录执行语句序列（即循环记录上移动，对每一条记录执行语句序列（即循环体）。体）。说明：说明：1的默认值为的默认值为ALL。2SCAN、ENDSCAN成对出现，缺一不可。成对出现，缺一不可。哥漂蜗暖韦试焕计中楼宫阶争帅巳徊蓝匝馋夸慌批诉锯博鄂蓟豹傈割型昧XXXX年第6章程序设计基础XXXX年第6章程序设计基础SCAN语句举例语句举例1例例 逐条显示教师表的每一条记录逐条显示教师表的每一条记录 clear clear use use 教师教师 scan scan displa

38、y display endscan endscan use use return return鸿蛇狮似呵袱随图匈漠沮彪普核掀成炔拜迄敖雹售跺宵酗邻搜洲宛唱蟹闰XXXX年第6章程序设计基础XXXX年第6章程序设计基础SCAN语句举例语句举例2例例 逐条显示教师表中女教师的每一条记录逐条显示教师表中女教师的每一条记录 clear clear use use 教师教师 scan for scan for 性别性别=女女 display display endscan endscan use use return return茧料酮腕谴绰智瑞谓声痔桐噶凿阴渺漓荒患逛凑巴磊叹阜叫青玉崩号发扁XXXX年第

39、6章程序设计基础XXXX年第6章程序设计基础在在SCAN语句中加语句中加LOOP子句改写上述例子子句改写上述例子 clear clear use use 教师教师 scan scan if if 性别性别=女女 display display else else loop loop endif endif endscan endscan use use return return另痪轨绣环适现如由次唁芽雕燥眷貌庸漆雕揭谤玻赁少挡钱兰蹭作杜育疚XXXX年第6章程序设计基础XXXX年第6章程序设计基础用用FOR语句改写上述例子语句改写上述例子例例 逐条显示每位女教师的记录逐条显示每位女教师的记录c

40、learclearuse use 教师教师 sele count(*)from sele count(*)from 教师教师 into arra into arra 记录总数记录总数 for i=1 to for i=1 to 记录总数记录总数 go i go i if if 性别性别=女女 disp disp endif endif endfor endfor use use return return探织捶磐谗亚梁粟少泌掐稿陨禁榜农趴为收俘笋拎盐篱赊妥娜典吹贯宰麓XXXX年第6章程序设计基础XXXX年第6章程序设计基础用用DO WHILE语句改写上述例子语句改写上述例子例例 逐条显示每位女教师的记录逐条显示每位女教师的记录clearclearuse use 教师教师 do while.not.eof()if if 性别性别=女女 disp disp endif endif skip skip enddo enddo use use return return挎蝇淖吱姥遭乓尤罢济贷偏伐吧夹搏婪哗燃骇踢丁蒙吨筋柿憨瓷堕仗埔硝XXXX年第6章程序设计基础XXXX年第6章程序设计基础