新数据库原理及应用 教学课件 刘敏涵 主编 郭立文 尹毅峰 副主编 第6章.pptVIP

第6章 程序设计 6.1 程序文件操作 6.1.1 程序文件的建立 （1）使用“文件”菜单 （2）使用“项目管理器 （3）使用命令窗口 4.程序的执行 DO 命令文件名 6.1.2 程序文件的修改 1.程序文件的修改 MODIFY COMMAND 文件名 2.程序的注释方法 语句行注释的格式： 命令行 [注释内容] 6.2 顺序结构 例 在屏幕的（0，0）点输出第一个学生的照片，并将学生的基本信息显示到相片的旁边。 USE 学生信息表 @0,0 SAY 照片 @0,12 SAY 学号+学号 @1,12 SAY 姓名：+姓名 @0,12 SAY 学号：+学号 @2,12 SAY 班级：+班级 @3,12 SAY 系别：+系别 6.3 选择结构 6.3.1 IF-ENDIF语句 IF 条件表达式 语句序列 ENDIF 例 当成绩小于60时，显示“不及格”信息框。 USE CJGL!成绩信息表 ＆＆从CJGL数据库中打开成绩信息表 IF 成绩60 ?MESSAGEBOX(不及格,48,系统提示) ENDIF 6.3.2 IF-ELSE-ENDIF语句 1.选择分支的语句格式为 IF 条件表达式 语句序列1 ELSE 语句序列2 ENDIF 例 判断课程的成绩是否通过。 USE CJGL!成绩信息表 ＆＆从CJGL数据库中打开成绩信息表 IF 成绩60 ?MESSAGEBOX(不及格,48,系统提示) ELSE ?MESSAGEBOX(通过,48,系统提示) ENDIF 2.分支嵌套 例6 当某门课程为考查课时，将百分制的成绩转换为等级分，其规则是优（90分以上）、良(80至90分数段)、及格（60至80分数段）和不及格（低于60分）。 程序代码： USE 成绩信息表 打开成绩信息表 IF 成绩60 IF 1＃，是否不及格 @10,10 SAY “不及格” FONT “黑体”，36 真值.T.为不及格 ELSE ELSE 1＃，即成绩=60 IF 成绩80 IF 2＃，是否小于80，隐含大于等于60 @10,10 SAY “及格” FONT “黑体”，36 真值.T.表示大于等于60且小于80 ELSE ELSE 2＃，即成绩=80 IF 成绩90 IF 3＃ 是否小于90，隐含大于等于80 @10,10 SAY “良” FONT“黑体”,36 真值.T.为表示大于等于80且小于90 ELSE ELSE 3＃，即成绩=90 IF 成绩=100 IF 4＃ 是否小于等于100，隐含大于等于90 真值.T.为表示大于等于90且小于等于100 @10,10 SAY “优” FONT “黑体”，36 ENDIF ENDIF 4＃ ENDIF ENDIF 3＃ ENDIF ENDIF 2＃ ENDIF ENDIF 1＃ 6.3.3 DO CASE-ENDCASE语句 语句格式为： DO CASE CASE条件表达式1 语句序列1 [CASE条件表达式2 语句序列2 … CASE条件表达式n 语句序列n] [OTHERWISE 语句序列n+1] ENDCASE 例 利用多路分支将考查课的百分制成绩转换为等级分，其规则是优（90分以上）、良(80至90分数段)、及格（60至80分数段）和不及格（低于60分）。 USE 成绩信息表 DO CASE CASE 成绩=90 .AND. 成绩=100 ?MESSAGEBOX(优,48,系统提示) CASE 成绩=80 ?MESSAGEBOX(良,48,系统提示) CASE 成绩=60 ?MESSAGEBOX(及格,48,系统提示) OTHERWISE ?MESSA