实验十程序的设计基础.pptVIP

第七章 应用程序设计基础 7.1 程序文件的建立与运行 VFP系统提供的命令十分丰富，而且功能强大。把这些命令和程序设计语句有效地组织在一起，形成实现某一特定功能的程序，能够更充分地体现VFP系统的特点。 VFP系统的程序有两个特点：一是程序控制流模式，由顺序、分支、循环三种基本结构构成，每一个基本结构可以包含一个或多个语句。二是面向对象可视化的结构程序模块，每个模块也是由程序控制流组成。 7.2 程序控制结构 程序结构是指程序中命令或语句执行的流程结构。在VFP系统的应用程序中，常见的程序控制结构有顺序结构、选择结构和循环结构三种。 顺序结构是任何从简单到复杂的程序都离不开的主体基本结构，它按命令在程序中出现的先后次序依次执行。但是绝大多数问题仅用顺序结构是无法解决的，还要用到选择结构和循环结构。 7.2.1 选择结构程序设计 选择结构是VFP系统程序的基本结构之一，又称分支结构。选择结构语句有三种基本形式。 1、简单分支 语句格式： IF〈条件表达式〉 〈命令序列〉 ENDIF 语句功能：当条件为真时，执行IF和ENDIF之间的命令序列；当条件为假时，执行ENDIF后面的语句。 例如：检查DA.DBF中有无工资低于650元的记录，如果有，则显示该记录的信息，然后显示全部记录。程序如下： SET TALK OFF USE DA LOCATE FOR 工资 650.00 IF .NOT.EOF() DISPLAY ENDIF LIST SET TALK ON 2、选择分支语句 语句格式： IF 条件表达式 语句序列1 ELSE 语句序列2 ENDIF 语句功能：当条件为真时，先执行语句序列1，然后再去执行ENDIF后面的语句；当条件为假时，先执行语句组2，然后再转去执行ENDIF后面的语句。 例如:铁路托运行李，假设每张车票可按每Kg0.5元托运50Kg以内的行李，如果超过50Kg时，超过的部分每Kg加价0.3元。计算公式为 X=0.5×W （当W≤50Kg） X=0.5×50+0.8×(W-50) （当W50Kg） 程序如下： SET TALK OFF INPUT “请输入行李的重量为：” TO W IF W=50 X=0.5*W ELSE X=0.5*50+0.8*(W-50) ENDIF ?“行李的重量为”+STR（W，6，2）+“Kg，其运费为：” +STR（X，6，2）+“元” SET TALK ON RETURN 3、IF条件语句的嵌套 语句格式： IF 条件表达式1 语句组1 ELSE IF 条件表达式2 语句组2 ELSE IF 条件表达式3 语句组3 ELSE … ENDIF ENDIF ENDIF 4、多路分支语句 语句格式： DO CASE CASE 条件表达式1 语句组1 CASE 条件表达式2 语句组2 … [OTHERWISE] [语句组n] ENDCASE 例如：计算分段函数值： 2x-1 (x0) 3x+5 (0=x5) f(x)= x+1 (3=x5) 5x-3 (5=x10) 7x+2 (x=10) ?程序代码如下： SET TALK OFF INPUT “输入 X 的值：” TO X DO CASE CASE X0 F=2*X-1 7.2.2 循环结构程序设计 1、DO WHILE-ENDDO语句 语句格式： DO WHILE 条件表达式 语句序列1 [LOOP] 语句序列2 [EXIT] ENDDO 语句功能：当条件表达式的值为真时，始终执行语句组；否则执行ENDDO后面的语句。 例如：以显示方式输出1－10的数字。 SET TALK OFF CLEAR I=1 DO WHILE I =10 ? I I=I+1 ENDDO 语句I=I+1就是用来修改循环条件的，如果没有这一句，I的值永远等于是，上述循环就成为一个死循环。 例如：统计职工表ZGDA.DBF中，职称是讲师和副