第五章(全).ppt

5．返回语句 格式：RETURN 功能：中止正在执行的程序，把控制权返回给该程序的调用者。 5.2 程序的基本结构 5.2.1 顺序结构 5.2.2 选择结构 5.2.3 循环结构 5.2.4 程序范例 分析问题、确定任务; 划分模块、建立模型; 组织数据、描述操作步骤; 编写程序、上机调试; 分析运行结果、写出程序说明书。 IIF函数 格式：IIF(条件, 表达式1, 表达式2) 说明：当条件为真时,返回表达式1的值;否则,返回表达式2的值。 如：z=IIF(x=y, x, y) 可以用如下IF语句取代: IF x=y THEN z=x ELSE z=y ENDIF 5.2.3 循环结构 循环，是指在程序中从某处开始，有规律地反复执行某一个程序块的现象。 VF的循环命令有三类： 基于条件的循环 基于计数的循环 基于表的循环 例5.13 因“990301”班的学生在第2学期选修了“Visual FoxPro”课程，请用循环语句向成绩表加入这些选课信息，成绩待定。 CLEAR DIMENSION cj(6) OPEN DATABASE 教学 SELECT 课程号 INTO ARRAY kch FROM 课程 WHERE 名称=Visual FoxPro cj(2)=kch(1) cj(6)= 2 SELECT 0 USE 学生 DO WHILE .NOT. EOF( ) IF 班号=990301 THEN cj(1)=学号 INSERT INTO 成绩 FROM ARRAY cj ENDIF SKIP ENDDO CLOSE DATABASE RETURN 例5.14 用FOR循环计算1+2+…+100的结果。 CLEAR S=0 累加和初值 FOR I = 1 TO 100 S=S+I 累加 ENDFOR ? S=,S RETURN 例5.15 用FOR循环编程，从键盘输入一个自然数n，打印一个由“*”组成的、共有2*n-1行的菱形图案，图5-9是当n=4时的图案。 CLEAR INPUT n= TO n FOR i = 1 TO n ? SPACE(n-i)+REPLICATE(*,2*i-1) ENDFOR FOR i = n –1 TO 1 STEP -1 ? SPACE(n-i)+REPLICATE(*,2*i-1) ENDFOR RETURN 【练习3】求1到100中偶数的和 AA=0 FOR II=2 TO 100 STEP 2 AA=AA+II ENDFOR ? AA 例5.16：统计表文件“教师.DBF”中“计算机”与“物理”专业的教师人数。 SET TALK OFF STORE 0 TO A,B CLEAR USE 教师 SCAN DO CASE CASE 专业=计算机 A=A+1 CASE 专业=物理 B=B+1 ENDCASE ENDSCAN ? 计算机：+STR(A,3) ? 物理：+STR(B,3) USE SET TALK ON 5.2.4 程序范例 例5.18 假设某中学有一个管理记录本校学生成绩的表文件“xscj.dbf”，结构如下： 字段 字段名 类型 宽度 小数 1 学号 数值型 5 2 姓名 字符型 8 3 性别 字符型 2 4 年龄 数值型 2 5 语文 数值型 5 2 6 数学 数值型 5 2 7 物理 数值型 5 2 8 化学 数值型 5 2 9 英语 数值型 5