资源描述：
《数据库原理与应用第8章》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、第8章循环第8章循环8.1三条循环语句8.2循环常用的三种基本控制方式8.3短路循环语句LOOP8.4循环语句与其它分支判断语句的嵌套8.5循环语句应用举例8.6多重循环第8章循环8.1三条循环语句8.1.1循环语句DOWHILE1.DOWHILE语句的语句格式DOWHILE语句的语句格式为:DOWHILE〈条件表达式〉〈循环体〉ENDDO循环语句格式中,DOWHILE为循环起始语句ENDDO为循环结束语句循环体是几条语句组成的语句行序列,执行循环体能完成的功能即为此循环的基本功能。第8章循环2.DOWHILE语句的执行过程图8—1给出了DOWHILE语句的执行流程。图8—1DOWHILE循
2、环语句流程图第8章循环①系统在执行程序过程中,遇到了循环起始语句DOWHILE时,首先计算〈条件表达式〉的值。②执行到循环结束语句ENDDO时,表示循环体已结束,系统“回跳”到循环起始语句去再一次执行DOWHILE语句。ENDDO和DOWHILE语句必须成对出现。在循环体内必须有使〈条件表达式〉逐渐为假的语句否则,将进入死循环。第8章循环8.1.2循环语句SCAN1.SCAN语句的语句格式SCAN语句的语句格式为:SCAN［〈范围〉］［FOR〈条件1〉］［WHILE〈条件2〉］〈循环体〉ENDSCAN语句格式中,SCAN为循环起始语句,ENDSCAN为循环结束语句。本语句对范围内满足条件的记
3、录执行〈循环体〉。默认范围值为ALL。第8章循环2.SCAN语句的执行过程在执行程序时,遇到SCAN语句,系统即在范围内顺序查找第一条满足条件的记录(条件项以WHILE开头时,情况与以FOR开头的有差别,见第3章中命令的一般形式)。找到后,即执行循环体部分,然后再顺次往下查找下一条满足条件的记录……搜索完范围内最后一条记录后,SCAN语句执行完毕。第8章循环8.1.3循环语句FOR1.FOR语句的语句格式FOR语句的语句格式为:FOR〈循环变量名〉=〈数字表达式1〉TO〈数字表达式2〉［STEP〈数字表达式3〉］〈循环体〉ENDFOR/NEXT语句格式中,〈循环变量名〉既可是一个内存变量,也
4、可以是某数组的一个下标变量。若不存在,则自动建立之。第8章循环2.FOR语句的执行过程图8—2给出了FOR语句的执行流程。图8—2FOR循环的执行流程第8章循环第一步，系统首先求出〈数字表达式1〉、〈数字表达式2〉、〈数字表达式3〉(若缺省,默认为1)的值,并分别作为循环初值、循环界值、步长,存入内存有关区域。第二步,系统给循环变量赋初值。第三步,判断循环变量越界否。若越界,则FOR循环执行完毕,转去执行ENDFOR(或NEXT)后的第一条语句若不越界,则执行循环体。第四步,遇到ENDFOR(或NEXT)时,循环变量内容增加步长值。然后,转第三步。第8章循环对于FOR语句的执行流程,再作如下
5、说明：①三个表达式的值求出后,即送内存有关区域存储。以后,在执行循环体时,若对三个表达式中所含变量内容作了修改,也不会影响到循环初值、循环界值、步长。②给循环变量赋初值后,若初值已经越界,则一次也不执行循环体,FOR语句就告结束,转ENDFOR(或NEXT)后一语句。③当步长大于0时,循环变量值大于循环界值时为越界当步长小于0时,循环变量值小于循环界值时为越界。④执行循环体时,若修改了循环变量值,将会影响到循环执行次数。第8章循环8.2循环常用的三种基本控制方式8.2.1对库文件记录进行操作时的循环控制方式1.对库文件记录进行逐条操作的循环控制方式格式1:SCAN〈语句行序列〉ENDSCAN
6、格式2:DOWHILE.NOT.EOF()〈语句行序列〉SKIPENDDO第8章循环格式1的循环起始语句SCAN不带任何范围和条件,因此,对所有记录逐条进行 操作。 格式2中,循环起始语句DOWHILE的条件为.NOT.EOF(),在循环体内有执行一条记录指针下跳一条记录的SKIP语句。因此,也能实现对所有记录逐条进行操作的目的。第8章循环2.选择库文件中符合条件的记录进行循环操作格式1:SCAN［〈范围〉］［FOR〈条件〉］〈语句行序列〉ENDSCAN格式2:LOCATE［〈范围〉］［FOR〈条件〉］DOWHILEFOUND()〈语句行序列〉CONTINUEENDDO两格式都对范围内符合条
7、件的记录逐条进行操作。执行完后,记录指针都指向范围内最后一记录。第8章循环例2修改库文件“职工.DBF”中职工的工资,对工资不超过100元且不低于50元者加10元。依题意,例2的流程图如图8—4。第8章循环图8—4例2的流程图第8章循环采用SCAN语句,程序如下:SETTALKOFFCLEARSETPRINTERONUSE职工SCANFOR工资<=100.AND.工资>=50REPL工资WITH工资+10EN
