721VFP的交互式输入输出命令-山西国际商务职业学.PPT

[LOOP]：直接将程序控制返回到DO WHILE语句，并重新计算条件值。LOOP可以放在DO WHILE和ENDDO之间的任何位置。 [EXIT]：将程序控制从DO WHILE和ENDDO循环的内部转到ENDDO后的第一条命令。EXIT可以放在DO WHILE和ENDDO之间的任何位置。 ENDDO：表明DO WHILE语句的结束。 【例7-7】计算连续自然数之和，并且显示和刚大于1000的最后一个自然数。 STORE 0 TO AA,BB DO WHILE AA=1000 BB=BB+1 AA=AA+BB ENDDO ? BB 结果显示为45。 VFP命令集。 山西国际商务职业学院 SHANXI INTERNATIONAL BUSINESS VOCATIONAL COLLEGE 数据库应用程序设计 返回 【例7-8】求连续N个不是7的倍数的自然数之和，当和是101的倍数时显示最后的自然数和它们的和。 STORE 0 TO AA,BB 定义二个变量，用以保存累加值和累加数 DO WHILE .T. BB=BB+1 IF MOD(BB,7)=0 判断BB是否为7的倍数 LOOP 如果BB是7的倍数则返回去将BB再加1 ENDIF AA=AA+BB 将BB不是7的倍数的连续自然数累加求和 IF MOD(AA,101)=0 判断AA是否是101的倍数 EXIT 如果AA是101的倍数，则结束程序的循环 ENDIF ENDDO ? BB,AA 屏幕显示结果为207和18483。 山西国际商务职业学院 SHANXI INTERNATIONAL BUSINESS VOCATIONAL COLLEGE 数据库应用程序设计 返回 （2）基于计数的循环：FOR命令 格式：FOR 内存变量=初始值 TO 终值 [STEP 步长] 语句序列 [EXIT] [LOOP] ENDFOR/NEXT 参数描述： 内存变量：指定作为计数器的内存变量或数组元素。在执行FOR…ENDFOR语句之前，此内存变量或数组元素不一定存在。 初始值 TO 终值：初始值是计数器的初始值，而终值是计数器的终止值。 [STEP 步长]：是计数器递增或递减的步长。如果步长是负值，则计数器递减；如果省略STEP子句，计数器每次递增1。 语句序列：指定要执行的VFP命令，它可以包含任意数量的命令。 山西国际商务职业学院 SHANXI INTERNATIONAL BUSINESS VOCATIONAL COLLEGE 数据库应用程序设计 返回 [EXIT]：将控制权交给紧接在ENDFOR后面的命令。可以在FOR与ENDFOR之间的任何地方放置EXIT。 [LOOP]：将控制权直接交给FOR子句，不再执行LOOP与ENDFOR之间的语句。计数器正常递增或递减，就像执行到ENDFOR子句一样。可以在FOR与ENDFOR之间的任何地方放置LOOP。 说明： 可以用内存变量或数组元素作为计数器，指定FOR…ENDFOR循环中VFP命令的执行次数。在遇到ENDFOR或NEXT之前，始终执行FOR后面的VFP命令。执行过程中，每循环一次，计数器都会产生一次计数，计数增量由步长值控制，然后把计数器的值与终值进行比较，决定是否进行下一次循环。 【例7-9】求1到100中偶数的和 AA=0 FOR II=2 TO 100 STEP 2 AA=AA+II ENDFOR ? AA 屏幕显示为：2550 山西国际商务职业学院 SHANXI INTERNATIONAL BUSINESS VOCATIONAL COLLEGE 数据库应用程序设计 返回 （3）基于表的循环命令 格式：SCAN [范围] [FOR 条件] [WHILE 条件] [语句序列] [LOOP] [EXIT] ENDSCAN 参数描述： [范围]：指定对当前表中记录扫描的范围。只有在范围之内的记录才有可能扫描到。SCAN命令的默认范围为ALL。 [FOR 条件]：只有条件表达式的计算结果为“真”的记录，才能对其执行命令。包含FOR子句可以筛选出不想扫描的记录。 [WHILE 条件]：指定一个逻辑表达式作为执行命令的条件，只要逻辑表达式计算为“真”，就对记录执行命令，直到遇到使表达式不为“真”的记录为止。 [语句序列]：指定要执行的VFP命令集。 山西国际商务职业学院 SHANXI INTERNATIONAL BUSINESS VOCATIONA