vfp-循环结构-2010.ppt

循环问题的提出 CLEAR NSum=1 NSum=NSum+2 NSum=NSum+3 …... NSum=NSum+99 NSum=NSum+100 ? [1到100的累加之和为 ]+STR(NSum) RETURN 循环结构程序设计 VFP6. 0三种形式的循环语句 FOR / ENDFOR循环语句 DO WHILE / ENDDO语句 SACN / ENDSACN语句 FOR 循环结构 FOR 循环控制变量=初值 TO 终值 [ STEP 步长 ] 语句序列 [ IF 逻辑表达式 LOOP | EXIT ENDIF] ENDFOR FOR循环命令说明 首先将初值赋于循环控制变量 如果不超过终值，就执行语句序列 之后循环控制变量的值自动增加步长 再与终值比较，如果仍不超过终值，则再次执行语句序列 如此反复，直到循环变量的值超过终值时退出循环，执行ENDFOR语句后面的语句 FOR循环的例 编程求和 S=1+2+3+…+100。 CLEAR S=0 S存放和值 N=1 FOR I=1 TO 100 STEP 1 I为循环变量 S=S+N Sn-1+N赋Sn N=N+1 ENDFOR ? ”S=”,S 输出S的最终值 RETURN 本例执行过程分析 修改后的程序例 CLEAR S=0 FOR I=1 TO 100 S=S+I ENDFOR ? ”S=”,S RETURN 相关问题的解决 S=1+3+5+7+9+ …+99 S=2+4+6+8+ …+100 S=1+1/3+1/5+1/7+ …+1/99 S=1/2+2/3+3/4+4/5+5/6+6/7+ …+100/101 S=1-1/3+1/5-1/7+1/9- …+ … … … … … FOR循环的例 为数据表中的“序号(C,4)”字段顺序编号 即按照记录的物理顺序对记录的“序号”字段填入一个序号值；并首记录的序号值为“1”；依此类推，逐一进行编号 每次填写共分两步完成： 指针定位 替换序号字段　　REPLACE 序号 WITH 数值 填写操作从首记录开始，一直到末记录结束；需要进行的替换操作的次数就是记录的总数 流程与程序代码 任意输入的10个数值的倒数之和 完善程序：增加判断输入值是否为“0” FOR 循环结构 FOR 循环变量=初值 TO 终值 [ STEP 步长 ] 语句序列 [ IF 逻辑表达式 LOOP | EXIT ENDIF] ENDFOR 命令格式说明 循环体中可以包含EXIT命令和LOOP命令: 执行EXIT命令时，退出整个循环 执行LOOP命令时，结束本次循环 LOOP 和 EXIT 语句通常与IF 分支语句相结合使用 ,以决定是否结束本次循环或是否彻底退出循环 例4-19 CLEAR FOR n=1 TO 500 IF n%3=2 AND n%5=3 AND n%7=2 ?? n ?? [ ] ENDIF ENDFOR RETURN 显示全部的1974年以后出生的学生 基本思想----从首记录开始，逐条判断，满足者显示 指针移动----GOTO I 判断是否满足条件----- YEAR(出生日期)1974 对满足条件的记录显示----DISPLAY 反复执行的次数即为数据记录的总数---- COUNT TO N FOR I=1 TO N / ENDFOR FOR循环结构语句的局限性 CLEAR S=0 FOR I=1 TO 100 S=S+I ENDFOR ?