沈阳职业技术学院《数据库原理及应用》20.pptVIP

第 7 周 总第 20 次 学时 ：2教学专业班级：09计信1、2 课程：数据库原理及应用 授课教师：杜歆 6.10 分支结构程序设计 6.10.1 简单分支语句 语句格式： IF条件表达式 语句段 ENDIF 语句功能:当条件成立时,执行IF和ENDIF之间的语句段,执行结束后继续执行ENDIF的后续语句;若条件不成立,则直接转去执行ENDIF的后续语句。 例1、从student表中查找姓名为“赵娜”的学生信息。用a1.prg完成。 modi comm a1 set talk off use student locate for 姓名=“赵娜” if found( ) display endif set talk on 6.10.2 选择分支语句 语句格式： IF条件表达式 语句组1 ELSE 语句组2 ENDIF 语句功能:当条件成立时,先执行语句组1,然后再去执行ENDIF的后续语句;当条件不成立时,先执行语句组2然后再去执行ENDIF的后续语句。 例2、进上步完善例1。若没找到该学生信息时，在屏幕上显示“查无此人”。用a2.prg完成。 modi comm a2 use student locate for 姓名=“赵娜” if .not. eof( ) display else ? “查无此人！” endif 6.10.3 IF 条件语句的嵌套 语句格式: IF条件表达式1 程序段1 ELSE IF 条件表达式2 程序段2 ELSE 程序段3 ENDIF ENDIF 6.10.4 多分支结构语句 语句格式: DO CASE CASE条件1 语句组1 CASE条件2 语句组2 ……… [ OTHERWISE] [语句组N] ENDCASE 例3、从键盘输入一个分数(0～100)按规定划分等级并输出结果。划分标准如下: 90分以上 “优秀” 80～89 “良好” 70～79 “中等” 60～69 “及格” 60分以下 “不及格” INPUT“请输入一个分数” TO X DO CASE CASE X=90 ? “等级为优秀” CASE X=80 ? “等级为良好” CASE X=70 ? “等级为中等” CASE X=60 ? “等级为及格” OTHE ? “等级为不及格” ENDC 实战： 编写程序文件，显示任何一个给定日期是星期几的程序。 6.11 循环结构程序设计 6.11.1 DO WHILE ……ENDDO 语句格式：DO WHILE条件表达式 循环体 [LOOP] [EXIT] ENDDO 语句功能:当条件成立时,执行循环体内的语句,否则退出循环，执行ENDDO的后续语句。 注： （1）在循环体内必须有修改条件的语句，否则会进入死循环。 （2）LOOP（跳回语句） 该语句中断本次循环体的执行，跳回到循环的开始处，重复对条件的判断。 （3）EXIT（出口语句） 　该语句终止循环的正常执行，无条件地转到循环终止语句的后续语句。 （4）EXIT和LOOP只能在循环语句组中，否则提示