第一章数据库应用基础 Visual foxpro程序的组成部分 从功能上看, Visual foxpro程序可以分为三个部分: (1)程序的注释部分,一 般用于说明程序的功能、文件名等需要说明的有关信息。 (2)程序运行环境的设置及初始化部分。 (3)数据处理部分。通常任何一个有意义的程序,总是要有一些 原始数据,否则,这个程序就没有处理对象。同样,程序运行的结 果也有必要显示或打印出来,否则,用户将不知道程序干了一些什 么。因此,这部分程序常包括下列三个部分,依次为:提供原始数 据部分、数据处理部分、输出结果部分。这部分是程序核心部分 (4)控制返回部分。它控制程序返回到调用该程序的调用处
第一章 数据库应用基础 •Visual FoxPro程序的组成部分 从功能上看，Visual FoxPro程序可以分为三个部分： （1）程序的注释部分，一 般用于说明程序的功能、文件名等需要说明的有关信息。 （2）程序运行环境的设置及初始化部分。 （3）数据处理部分。通常任何一个有意义的程序，总是要有一些 原始数据，否则，这个程序就没有处理对象。同样，程序运行的结 果也有必要显示或打印出来，否则，用户将不知道程序干了一些什 么。因此，这部分程序常包括下列三个部分，依次为：提供原始数 据部分、数据处理部分、输出结果部分。这部分是程序核心部分。 （4）控制返回部分。它控制程序返回到调用该程序的调用处
第一章数据库应用基础 8.3.2顺序结构 A A B
第一章 数据库应用基础 8 . 3 . 2 顺序结构
第一章数据库应用基础 例8.1试编程完成下列功能。从键盘上随机输入一个正数,以 此数为半径,求圆周长和圆面积,并输出结果。 程序如下: 求圆周长和圆面积程序VFP8-1.PRG&&注释语句 CLEAR &清屏语句 SET TALK OFF &系统参数设置语句 INPUT“"半径=”T0R &输入圆半径值 L=2*PI O*R &计算圆周长 S=PI(*R*米R &计算圆面积"圆周长=",L &显示圆周长值 ?"圆面积=",S &显示圆面积值 SET TALK ON &恢复参数设置语句 RETURN &返回语句
第一章 数据库应用基础 例8.1 试编程完成下列功能。从键盘上随机输入一个正数，以 此数为半径，求圆周长和圆面积，并输出结果。 程序如下： *求圆周长和圆面积程序VFP8-1.PRG &&注释语句 CLEAR &&清屏语句 SET TALK OFF &&系统参数设置语句 INPUT "半径=" TO R &&输入圆半径值 L=2*PI()*R &&计算圆周长 S=PI()*R*R &&计算圆面积" 圆周长=",L &&显示圆周长值 ? "圆面积=",S &&显示圆面积值 SET TALK ON &&恢复参数设置语句 RETURN &&返回语句
第一章数据库应用基础 8.3.3分支结构 1.IF.ELSE. ENDIF语句 语句格式: IF〈条件> 语句序列1 TELSE 语句序列2> ENDIF ·语句功能:判断给定的条件是否成立。成立,则执行语句 序列1;否则执行语句序列2
第一章 数据库应用基础 8.3.3 分支结构 1. IF…ELSE…ENDIF语句 •语句格式： IF <条件> <语句序列1> [ELSE <语句序列2>] ENDIF •语句功能：判断给定的条件是否成立。成立，则执行语句 序列1；否则执行语句序列2
第一章数据库应用基础 功能说明: (1)ELSE是一个可选项。当ELSE子句缺省时,如果条件不成立, 将不执行任何语句。直接转向 ENDIF后的下一条语句。 (2)IF和 ENDIF必须成对出现,IF是本结构的入口, ENDIF是本 结构的出口 (3)条件语句可以嵌套,但不能出现交叉。在嵌套时,为了使 程序清晰、易于阅读,可按缩进格式书写。 条件表达式 条件表达式 语句行序列 语句行序列1 语句行序列2 ENDF后面的语句 ENDF后面的语句
第一章 数据库应用基础 •功能说明： （1）ELSE是一个可选项。当ELSE子句缺省时，如果条件不成立， 将不执行任何语句。直接转向ENDIF后的下一条语句。 （2）IF和ENDIF必须成对出现，IF是本结构的入口，ENDIF是本 结构的出口。 （3）条件语句可以嵌套，但不能出现交叉。在嵌套时，为了使 程序清晰、易于阅读，可按缩进格式书写