（中职）第4章 结构化程序设计ppt课件.ppt

《（中职）第4章 结构化程序设计ppt课件.ppt》由会员分享，可在线阅读，更多相关《（中职）第4章 结构化程序设计ppt课件.ppt（66页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、在此输入您的封面副标题（中职）第4章 结构化程序设计4.1第 4 章结构化程序设计前面介绍了很多数据操作的方法，可以看出 Visual FoxPro 6.0 拥有强大的数据管理功能。但是，前面的方法都是基于命令或菜单方式的操作，效率不高。如果有程序员将进行重复操作或复杂操作的命令编制成一个序列，以后只要执行这个命令序列就可以迅速完成相应操作，就可以很好地解决上述问题了。【案例 15】常用命令的程序设计案例描述通常把编制命令序列的过程称为编写程序代码，把写好的命令序列称为程序。程序设计就是为实现一种功能而编写命令的过程。一条命令即完成一个特定动作的指令。每条命令都有自己特定的语法，用来说明为实现

2、该命令的功能所必须包含的东西。相关知识1Visual FoxPro 6.0 命令的相关概念（1）命令的组成命令由命令动词和语句体组成。Visual FoxPro 6.0 中所有的命令均以命令动词开头，必不可少。命令动词指定了该命令的功能，即做什么，它是 Visual FoxPro 6.0 的保留字。语句体用于指明命令动词的操作对象或操作方法，即对谁做、怎么做。它多以参数的形式出现。有些命令中语句体可以省略，省略后常有默认含义，有些必不可少。（2）命令的书写规则 命令必须以命令动词开头。 命令中可以有多个参数，参数的次序任意，各参数之间能用空格隔开。 为了便于用户使用，所有的保留字只要写出前四个

3、字符即可。例如，可以将 CREATEDATABASE 命令简写成 CREA DATA 或 CREATE DATA 或 CREA DATABASE 等，英文不区分大小写。 每条命令最多由 254 个字符组成，一个汉字占两个字符，空格也计算在内。 每条命令占一行，输入完毕后，按【Enter】键执行。TO2接收键盘输入的命令（1）INPUT 命令命令：INPUT功能：接受用户从键盘输入的数据，并将其赋给内存变量。说明： 指定命令执行时显示的信息。通常是一个字符串，字符串必须用单引号、双引号或方括号括起来。 指定存放输入数据的内存变量或数组元素。如果该内存变量不存在，此命令将自动创建一个内存变量。使用

4、此命令可输入 N，C，D，L 等多种类型的数据，数据应按其类型规定的形式输入。例如，字符型数据要用引号括起来，数值型数据可以直接输入。如果直接按【Enter】键或者输入非法的表达式，屏幕会重新显示，直到输入一个合法的表达式。（2）ACCEPT 命令命令：ACCEPT TO 功能：把用户从键盘输入的字符型数据赋值给内存变量。说明： 指定命令执行时显示的内容。通常是一个字符串，字符串必须用单引号、双引号或方括号括起来。 存储字符数据的内存变量或数组元素。输入的数据将作为字符型数据处理，不需要单引号、双引号等定界符。如果使用了定界符，则这些定界符也被作为输入字符的一部分，一起存入内存变量中。如果只输

5、入一个【Enter】键，将把一个“空”字符赋给内存变量。（3）WAIT 命令命令：WAIT TO 功能：把用户从键盘输入的单个字符型数据赋值给内存变量。说明：指定命令执行时显示的内容。通常是一个字符串，字符串必须用单引号、双引号或方括号括起来。存储单个字符数据的内存变量或数组元素。如果不指定内存变量则屏幕显示“按任意键继续”。3注释语句命令：& 注释内容编写代码时，一定要为代码添加注释，没有任何注释的程序阅读起来非常困难。即使是自己编写的代码，如果没有注释，经过一段时间后读起来也会感觉吃力。Visual FoxPro 6.0 中的注释语句从符号&开始一直到本行末尾的内容都是注释，可以是中文也可

6、以是英文，其内容不会对程序的执行产生任何影响。4常用 SET 命令在 Visual FoxPro 6.0 中，环境设置对编程非常重要。例如，SET PATH 命令设置查找文件的路径，如果设置不正确，就无法正确地在特定的路径下找到程序文件或资源文件。环境设置主要是通过 SET 命令对系统变量进行设置。设置的系统变量值有的存储在当前数据工作期中，有的作为系统注册时的启动默认值，也有的存储在资源文件中。使用 SET 命令可以修改系统配置，例如，如果希望启动时在状态栏上显示时钟，可以通过下列命令来完成：SET CLOCK ON。如果希望查看环境设置状态，可以选择以下的任何一种方法。显示多个环境设置：打

7、开“工具”菜单中的“选项”对话框并查看当前设置，或者是在“命令”窗口中输入 DISPLAY STATUS 命令。显示单个环境设置：在“命令”窗口使用 SET()函数来显示任何 SET 命令的当前值。下面分类说明一些常用 SET 命令的用法。（1）SET EXCLUSIVE命令：SET EXCLUSIVE ON | OFF功能：指定以独占方式还是共享方式打开表文件。改变 SET EXCLUSIVE 的设置并不改变已经打开表的状态。作用域是当前数据工作期。说明：其中，ON指定以独占方式打开数据表，这是全局数据工作期的默认方式。在这种方式下，只有打开表的用户有权限访问该表，网络上的其他用户不能以任何

8、方式访问该表，包括只读方式。在 USE 命令中使用 EXCLUSIVE 子句也可以在网络上以独占方式打开表文件，在此方式下，无需锁定该表的记录和文件。有些命令只能处理以独占方式打开的表，这些命令有 INSERT、INSERTBLANK、MODIFY STRUCTURE、PACK、REINDEX、ZAP 等。OFF指定以共享方式打开数据表，这是私有数据工作期的默认方式。它允许网络上的任何用户共享和修改网络上打开的表。（2）SET DELETED命令：SET DELETED ON | OFF功能：指定数据操作命令在执行时，是否处理标有删除标记的记录。作用域是当前数据工作期。说明：其中，ON指定所有

9、带范围子句的命令在处理记录（包括在相关表中的记录）时，忽略标有删除标记的记录。OFF是该命令的默认值。它指定带有范围子句的命令在处理记录（包括在相关表中的记录）时包含有删除标记的记录。如果默认的作用域是当前记录或者只含单个记录，SET DELETED 命令被忽略。REINDEX 命令总是忽略 SET DELETED 命令，给表中所有记录建立索引。（3）SET EXACT命令：SET EXACT ON | OFF功能：指定比较不同长度的两个字符串时的规则。说明：其中，ON两个字符串的每个对应字符都相等时，就认为两个字符串相等。OFF为该命令的默认值。该参数指定比较表达式右端字符串的每个字符都和左

10、端的字符串相匹配，就认为两表达式相等。（4）SET SAFETY命令：SET SAFETY ON | OFF功能：在覆盖已有文件之前是否显示对话框，当用表设计器或 ALTER TABLE 命令对表结构进行修改后，是否重新计算表或字段规则、默认值以及错误信息。作用范围是当前数据工作期。说明：其中，ON为该命令的默认值。它表示覆盖已有文件之前显示，并提供选项供用户决定是否覆盖已有文件。该参数使得表结构被修改后会重新计算表规则或字段规则、默认值以及错误信息。保存表结构所做的修改时，使用新的或修改后的数据有效性规则进行数据有效性检查。如果有效性规则包含 UDF（用户自定义函数），将不计算 UDF，并且

11、忽略有效性规则。OFF指定在覆盖已有文件时不显示对话框。该参数指定表结构被修改后不重新计算表规则或字段规则、默认值以及错误信息。但是，保存表结构所做的修改时，使用新的或修改后的数据有效性规则进行数据有效性检查。（5）SET DATE命令：SET DATE TO AMERICAN | ANS | BRITISH | FRENCH | GERMAN | ITALIAN | JAPAN| USA | MDY | DMY | YMDTO功能：指定日期表达式和日期时间表达式的显示格式。在当前数据工作期有效。日期的默认设置是 AMERICAN。SET DATE 设置也决定日期在日期时间表达式中的格式。说明

12、：其中，各参数所对应的日期、时间格式如表 4-1-1 所示。（6）SET MARK TO命令：SET MARKcDelimiter功能：指定显示日期表达式时所使用的分隔符。作用范围是当前数据工作期。说明：其中，cDelimiter指定所使用的日期分隔字符。无 cDelimiter 参数时，将分隔符重置为默认的正斜杠符()。（7）SET CENTURY命令：SET CENTURY ON | OFF功能：是否显示日期表达式中的世纪部分。作用域是当前数据工作期。说明：其中，ON指定在包含 10 个字符（包括日期分隔符）的日期格式中，用四位数字表示年。OFF为该命令的默认值。它表示指定在包括 8 个字

13、符的日期格式中，用两位数字表示年。在进行日期计算时假定它表示的是二十世纪。（8）SET HOURS命令：SET HOURS TO 12 | 24功能：将系统时间设置为 12 小时或 24 小时格式。说明：其中，12为该命令的默认值。指定为 12 小时时间格式。24指定为 24 小时时间格式。如果省略 12 或 24 参数时，将返回默认的 12 小时时间格式。TIME()函数总是返回 24 小时时间格式的时间值，不受 SET HOURS TO 的影响。但是 DATETIME()函数的返回值格式由 SET HOURS TO 的设置决定。（9）SET SECONDS命令：SET SECONDS ON

14、 | OFF功能：指定显示日期时间值时是否显示秒。TO说明：其中，ON为该命令的默认值。它表示指定在日期时间值中显示秒。OFF指定在日期时间值中不显示秒。（10）SET CURRENCY命令：SET CURRENCYcCurrencySymbol或SET CURRENCY LEFT | RIGHT功能：定义货币符号并且指定货币符号在数值、货币、浮点数和双精度数表达式中的显示位置。说明：其中，cCurrencySymbol指定用作货币符号的字符串，最长可以是九个字符。使用不带 cCurrencySymbol 参数的 SET CURRENCY TO 命令将货币符号设置为默认的美元符$。LEFT为该

15、命令的默认值。它指定将货币符号放在货币值的左边。RIGHT指定将货币符号放在货币值的右边。在当前数据工作期有效。（11）SET TALK命令：SET TALK ON | OFF功能：该命令确定是否显示 Visual FoxPro 6.0 命令执行过程中的状态信息。说明：其中，ON显示 Visual FoxPro 6.0 命令执行的状态。OFF不显示 Visual FoxPro 6.0命令执行的状态。参数ON、OFF二者中必须选择其一。很多 Visual FoxPro 6.0 命令执行后，在状态栏会显示执行的结果。例如，LOCATE FOR 命令执行时，如果找到所需记录，则显示被找到的记录号，否

16、则会显示“已到文件尾”，但在程序运行中可能不需要显示这些信息，如果找到记录就直接显示该记录；如果记录无法找到，可以使用对话框给出相应提示。所以大多数情况下在程序开始就将 SET TALK 设置为关闭状态。（12）SET DEFAULT命令：SET DEFAULT TO cPath功能：指定默认的驱动器、目录或文件夹。说明：其中，cPath可以是下列内容：驱动器符、含目录名称或文件夹名称的驱动器符、子目录名称或文件夹名称。Visual FoxPro 6.0 在默认的目录或文件夹中搜索文件。默认的目录或文件夹就是启动 Visual FoxPro 6.0 的目录或文件夹。不过，可以在启动程序或 Vi

17、sual FoxPro6.0 的配置文件中指定一个不同的默认目录或文件夹。如果 Visual FoxPro 6.0 不能在默认的目录或文件夹中找到文件，将搜索另一个指定的路径。要指定 Visual FoxPro 6.0 路径可使用 SETPATH。使用下面命令可以将默认驱动器设置为驱动器 A：SET DEFAULT TO A；还可以使用下列命令形式指定一个特定的目录，SET DEFAULT TO d:work；也可以使用下面命令将默认目录设置为上一层父目录：SET DEFAULT TO 如果想将默认目录恢复成为 Visual FoxPro 启动目录，则可以使用不带参数的 SET DEFAULT

18、 命令：SET DEFAULT TO。（13）SET PATH命令：SET PATH TO Path功能：指定查找文件的路径。4.2说明：其中，Path指定查找文件的一组目录。用逗号或分号隔开不同的目录。SET PATH指定一组目录，用于 Visual FoxPro 6.0 无法在当前默认目录中找到文件的情况下查找文件。不带参数的 SET PATH 命令把路径恢复为默认目录或默认文件夹。作用范围为当前数据工作期。编写程序时，需要有各种数据，如常量、变量、数组等进行信息传递。所有 Visual FoxPro 6.0 数据都有其所属的类型。类型就是对数据的允许取值以及这个值的范围进行的说明。数据类

19、型决定了数据的存储方式和使用方式。不同的数据类型具有不同的运算含义、表现形式和变化范围。【案例 16】使用分支语句程序设计案例描述根据语句的书写顺序依次执行程序命令的程序结构称为顺序结构。但是在完成相关程序设计时，不可能完全使用顺序结构，有时需要根据不同的条件，选择执行不同的程序语句，这种程序结构被称为分支结构。分支结构以条件或判断为起点，根据逻辑判断是否成立而决定程序运行的方向。有时从程序某个位置开始有规律地反复执行一段程序，而执行次数由一个控制循环的条件来决定，这种结构被称为循环结构，根据特定的条件来执行指定程序。相关知识1常量常量是指数据处理过程中其值和类型均保持不变的量。在 Visua

20、l FoxPro 6.0 中，作为常量常用到的数据类型主要有以下几种。（1）数值型常量（numeric）数值型数据是有大小含义、可以参与数学运算的数据。数值型数据可以由正号、负号、09的数字和小数点组成。比较大或比较小的数据还可以采用科学计数法，其中整数还可以采用十六进制表示法。数值型数据的范围是-0.9999999999E+190.9999999999E-20。数值型常量就是平常所说的“数”。（2）字符型常量（character）字符型数据是由字母、数字、空格、符号和汉字等字符组成的文字序列。字符型常量最多可由 254 个字符组成，其中一个汉字占两个字符。字符型常量又称字符串，必须用定界符一

21、对双引号“”或单引号或方括号括起，在计算字符串的长度时定界符不包含在内。例如，表示身份证号的“是一个包含 18 个字符的字符串；表示姓名的张天翼是一个包含 6 个字符的字符串；表示培训班编号的y-001-01是一个包含 8 个字符的字符串等。（3）逻辑型常量（logic）逻辑型数据用于表示两种相反的状态。例如，对、错，真、假，是、否等。它只有两个值，一个为“真”，另一个为“假”。其常量要用定界符“.”。通常，逻辑“真”用“.T.”或“.Y.”表示，逻辑“假”用“.F.”或“.N.”表示，不区分大小写。（4）日期型常量（data）日期型数据是存储和表示年、月、日等日期的数据类型，其内部存储格式为

22、“yyyy/mm/dd”，其中 yyyy 代表年份，mm 代表月份，dd 代表日子，共占八个字符。年份的取值范围为 1009999；月份的取值范围为 112；日子的取值范围随年份和月份的不同而不同，最大范围为 131。日期型常量要用大括号 作为定界符。例如，报名日期 2006 年 1 月 20 日可以表示为2006/01/20。需要注意的是，日期型数据的格式并不固定，可以通过 SET DATE、SET CENTURY 等命令改成习惯使用的日期格式。常用的格式有mm/dd/yy、 yyyy-mm-dd 等。（5）日期时间型常量（datetime）日期时间型数据是存储和表示年、月、日、时、分、秒的

23、数据类型，其内部存储格式为“yyyy/mm/ddhh:mm:ss am|pm”。其中，hh 代表小时，mm 代表分钟，ss 代表秒，am 表示上午，pm 表示下午，日期和时间之间用空格分开。日期时间型数据可以只含日期不含时间，或者只含时间不含日期，或者既含日期又含时间。日期时间型常量也要用大括号 作为定界符。例如，报名日期 2006 年 1 月 20 日上午 10 点 20 分 39 秒可以表示为2006/01/20 10:20:39 am。至于时间采用 12 小时表示法，还是 24 小时表示法可以通过 SET HOURS 命令设置。（6）货币型（currency）货币型数据是数值型数据的一种

24、变形。与一般数值型数据不同的是数值之前或之后要加货币符号，例如￥、$等。货币符号也可以通过命令设置。另外，货币型数据的小数位数为四位，四位以后的小数将被四舍五入。货币型常量就是一个固定的钱数。例如，50 美元可表示为$50。2变量变量是指在处理过程中其值可变的量。在 Visual FoxPro 6.0 中变量又进一步分为内存变量、数组变量、系统变量和字段变量。其中，字段变量是在打开表时，由系统自动产生的与字段名同名的变量。它们都可用于编写程序代码，开发系统功能。为了区分每个变量，需要给变量起一个名字，这个名字就是变量名。变量名可为字母、汉字、数字、下画线标识，但必须以字母或汉字开头。要注意的是

25、，变量名不要与系统定义的保留字相同，例如命令动词、参数、函数名等。（1）内存变量内存变量又称为简单变量。内存变量常用来存储用户经常用到的常量、程序运行的中间结果或最终结果、用户输入的信息等，只保留在内存中。因此，内存变量是一种临时工作单元，需要时可以临时定义，不用时可以释放。任意时刻，一个变量只保留一个值，当为同一变量赋第二个值时，第一个值将被覆盖。变量的类型由用户给变量所赋的值决定。为变量赋值的同时既声明了变量，又定义了变量的类型。如果未赋值就使用，则系统会弹出找不到变量的提示信息。常用的为内存变量赋值的方式有两种： 使用等号“=”命令赋值，在“命令”窗口中输入命令：=为不同类型的变量赋值只

26、需在命令窗口输入相应的赋值命令即可，如表 4-2-1 所示。需要注意的是，为日期型、日期时间型数据赋值时，数据格式与系统默认的格式有关。如果赋值格式与默认格式不符，系统会弹出提示信息。用户只需按照提示信息的格式要求重新赋值或用相应命令修改系统状态即可。 使用 STORE 命令赋值，在“命令”窗口中输入命令：STORE TO 其中变量名表是用逗号“，”分开的多个变量名。与等号赋值命令不同的是一条 STORE 命令可以同时给多个变量赋相同的值。例如为 a，b，c 赋相同的值 34，需输入命令：store34toa,b,c如果想检查变量的值，在“命令”窗口中输入命令：?表达式表或?表达式表其中，表达

27、式表为一个或多个表达式，各表达式之间用逗号“，”隔开。命令先计算各表达式的值，再将最终结果显示输出。?语句将表达式的结果另起一行显示。?语句在当前行显示表达式的结果。（2）数组变量在数据的操作过程中，有时需要存储成批的含义相同的数据，例如保存 50 个人的身份证号，如果使用简单变量就比较繁琐了。此时，可以使用 Visual FoxPro 6.0 中所设置的数组。VisualFoxPro 6.0 支持一维数组和二维数组。一维数组与向量相对应，具有如下形式：A=（a1,a2,a3,，ai,an）其中 ai（1in）为数组 A 的数组元素，i 称为该元素的下标，Visual FoxPro 6.0 默

28、认数组的最小下标为 1。二维数组与矩阵相对应，下面是一个具有三行四列的数组 A 对应的矩阵：3247861093512A 数组共有 12 个数组元素，其中值为 9 的元素处在第二行第三列，我们用 A（2，3）表示。2 称为行下标，3 称为列下标。Visual FoxPro 6.0 中可以将二维数组转换为一维数组。它将二维数组中的每一个元素按照从左到右、从上到下的顺序排序，即值为 3 的是第一个元素，值为 7 的是第二个元素，值为 10 的是第三个元素，值为 5 的是第四个元素，值为 2 的是第五个元素依此类推。则数组元素 A（2，3）还可以表示成 A（7）。 数组变量也要先定义后使用。定义数组

29、使用命令：DIMENSION |DECLARE (n1,n2),(m1,m2)其中，由用户指定，命名规则同变量名。括号中参数的个数决定了是一维数组，还是二维数组。括号可以是一对圆括号（）或一对方括号 。数组的最大下标由数组名后括号中的参数决定。因最小下标固定为 1，所以对于一维数组，最大下标数就是数组中元素的个数，对于一个二维数组，数组的行数乘以数组的列数就是数组中元素的个数。另外，根据需要可以用一条命令定义一个或多个数组，各数组名之间用逗号隔开。定义一个含有 10 个数组元素的一维数组 GROUP，用命令：DIMENSIONGROUP(10)该数组共有 10 个数组元素。定义一个具有 2 行

30、 4 列，名为 PART 的二维数组，用命令：DIMENSIONPART(2,4)该数组共有 8 个数组元素。在同一个命令中定义三个数组 ar1、ar2、ar3，用命令：DIMENSIONAR1(3,5),AR2(2,4),AR3(50) 数组创建后，系统将数组的所有元素都初始化为逻辑值“假”（.F.）。为数组赋值即为数组元素重新赋值。赋值方法同为变量赋值一样，数组元素的类型由用户赋予值的类型决定。同一数组各元素值的类型可以各不相同。为数组 GROUP 中的元素赋值，可以使用如下命令：GROUP(1)=000002GROUP(2)=李飞GROUP(3)=女GROUP(4)=01/20/2005

31、GROUP(5)=.T.其余的 GROUP（6）、GROUP（7）、GROUP（8）、GROUP（9）、GROUP（10）还均保留默认值 .F. 。如果命令 SET COMPATIBLE 设置为 FOXPLUS 或 OFF（默认设置），则可以用赋值语句为数组名赋值，从而实现为数组中的所有元素赋相同的值。定义一个 5 行 5 列的二维数组 X，将其所有元素赋值为“男”，可用命令：DIMENSIONX(5,5)STORE 男TO X（3）字段变量字段变量随着表文件的打开而产生，它是表中最基本的数据单元，它的名称、类型、值等内容在打开表文件的同时定义、赋值。字段变量除了可以是数值、字符、日期、逻辑、

32、货币等数据类型外，还可以是一些特殊的数据类型，例如备注、通用等。字段变量是一个多值变量，表文件中的记录个数就是同一个变量名中保留的值的个数。但任意时刻，字段变量只能有一个值，即记录指针所指记录对应的值。如果内存变量名与字段变量的名字重名，系统默认为是字段变量，此时如果需引用内存变量应在其变量名前加上“M.”或“M-”，以示区别。例如，内存变量姓名=王五，打开的表文件中如果也有姓名字段，且记录指针指向姓名为“李飞”的记录：?姓名显示结果为：李飞，?m.姓名显示结果为：王五。（4）系统内存变量系统内存变量是 Visual FoxPro 6.0 建立并自动维护的内部变量，是为方便程序设计而设置的。系

33、统内存变量被默认为全局变量（PUBLIC），用户也可以将系统内存变量改为局部变量（PRIVATE）。系统内存变量名以下画线开头，与一般变量有相同的意义和使用方法。因此可以像使用一般变量那样使用系统内存变量。3运算符和表达式如同数学运算一样，运算符用以连接运算对象。运算对象包括常量、变量和函数。将运算对象按照一定的规则用运算符连接起来得到表达式。Visual FoxPro 6.0 中的表达式根据参与运算的数据类型分为五种：算术表达式、字符串表达式、日期时间表达式、关系表达式和逻辑表达式。（1）算术表达式算术表达式是用算术运算符将数值型运算对象连接起来的表达式，算术运算符如表 4-2-2 所示。算

34、术运算的优先顺序由高到低为：正号（+）和负号（-）、乘方（ 或*）、乘（*）、除（/）和取余（%）、加（+）和减（-）。同级运算由左向右进行。小括号可以改变运算的优先顺序。括号可以嵌套，一律使用小括号（），运算时内层括号优先。（2）字符串表达式字符串表达式是由字符串运算符将字符类运算对象连的表达式，字符串运算符如表 4-2-3 所示。+、-运算符的优先级高于$，+、-运算符的优先级相同。同级运算由左向右进行。（3）日期时间表达式日期时间表达式是用日期时间型运算符将日期型或日期时间型常量、变量或函数连接起来的表达式，日期时间运算符如表 4-2-4 所示。两个运算符的优先级相同。同级运算由左向右进

35、行。需要注意的是时间越靠后越大，2008年 12 月 20 日比 2008 年 12 月 2 日大，比 2008 年 12 月 25 日小。（4）关系表达式关系表达式也称比较运算。关系表达式是用关系运算符将同类型可比较的两个常量、变量或函数连接起来的表达式。关系运算符如表 4-2-5 所示。比较运算符的优先级相同。同级运算由左向右进行。其中，数值型数据按其数值的大小进行比较；字符型数据按其第一个字符的 ASCII 值进行比较，如果第一个字符相同，再比较第二个，依此类推；汉字按照内码进行比较；日期型数据越靠后的越大；逻辑值 .F. 小于逻辑值.T.。默认情况下，SET EXACT 为 OFF 时

36、，只要从第一个字符起后串与前串对应字符相同，等号“=”比较的结果就为.T.。SET EXACT 为 ON 时，为精确比较，要求两个字符串完全相同时，运算结果才为.T.，否则为.F.。例如，在命令窗口中输入：set exact off?王五=王结果为：.T.set exact on?王五=王结果为：.F.（5）逻辑表达式逻辑表达式也称作布尔运算。逻辑表达式是用逻辑运算符将逻辑型运算对象连接起来的表达式。逻辑运算符如表 4-2-6 所示。逻辑运算的优先级由高到低为：逻辑非（NOT）、逻辑与（AND）、逻辑或（OR）。在一个表达式中可能包含几种不同类型的运算。要注意运算符与运算对象类型一致的问题，否

37、则会产生操作符与操作数类型不匹配的错误。不同类型运算的优先顺序由高到低为：算术型运算和字符型运算、日期时间型运算、关系型运算、逻辑型运算。括号可改变优先级顺序。例如，在命令窗口中输入：?3+23-15%3 and not 王五=王 +五 or07/20/05=05/04/05结果为：.T.。4顺序结构根据语句的书写顺序依次执行程序命令的程序结构称为顺序结构，如图 4-2-2 所示，执行了程序段 1 后按顺序执行程序段 2。5分支结构在程序编写过程中，有时需要根据不同的条件，选择执行不同的程序语句，这种程序结构被称为分支结构。分支结构以条件或判断为起始点，根据逻辑判断是否成立而决定程序运行的方向

38、，如图 4-2-3 所示。立？图 4-2-2顺序结构图 4-2-3分支结构（1）IF 语句命令格式：IF 逻辑表达式 THEN程序段 1ELSE程序段 2ENDIF说明：该语句根据逻辑表达式的值，判断是否执行程序段，如果逻辑表达式的值为真，执行程序段 1 之后执行 ENDIF 后的语句。如果逻辑值为假则执行程序段 2，如果没有 ELSE 语句及程序段 2，则直接执行 ENDIF 后的语句。IF 与 ENDIF 必须成对使用，在 IFENDIF 之间还可以有成对使用的 IFENDIF 语句，这种情况被称为分支嵌套。（2）DO CASE命令格式：DO CASECASE 逻辑表达式 1程序段 1CA

39、SE 逻辑表达式 2程序段 2CASE 逻辑表达式 n程序段 nOTHERWISE程序段 0ENDCASE说明：该语句根据多个不同的条件决定执行不同的程序段，当程序执行到 DO CASE 时，先求逻辑表达式 1 的值，如果不为真，则求逻辑表达式 2 的值，以此类推直到逻辑表达式 n。当检测到第一个值为真的逻辑表达式时，执行其后的程序段，执行完后跳过后面所有的 CASE，执行ENDCASE 后的语句。如果所有 CASE 后的逻辑表达式值都为假，则执行 OTHERWISE 后的程序段。如果没有 OTHERWISE，则直接执行 ENDCASE 以后的程序。注意，在 DO CASE 和 ENDCASE

40、 之间可以有任意多个 CASE 。但是 DO CASE 和 ENDCASE 必须成对使用。6循环结构循环结构是指根据特定的条件，从程序某个位置开始有规律地反复执行一段程序，而执行次立？数由一个控制循环的条件决定，如图 4-2-4 所示。立？图 4-2-4（1）FORENDFOR 语句命令格式：FOR 循环变量=初值 TO 终值 STEP 步长值循环体循环结构LOOPEXITENDFOR说明：“循环体”是由用户定义的一段程序。LOOP 子句可以放在“循环体”中的任意位置，当程序执行到该子句时，则直接返回第二步。EXIT 子句可以放在“循环体”中的任意位置，当程序执行到该子句时，则无条件跳出循环，

41、执行 ENDFOR 后面的语句。该语句可以根据给定条件，重复执行一段程序，执行次数由给定条件确定。执行时首先把初值赋给循环变量。接着检查循环变量的值沿变化方向是否超过终值。如果超过就跳出循环，执行 ENDFOR 后面的语句；如果未超过则执行一次“循环体”，遇到 ENDFOR 语句时，把“循环变量+步长值”的结果赋给循环变量。重复前两步，直到循环变量的值沿变化方向超过终值，结束循环。需要注意的是，FORENDFOR 循环语句中的 FOR 语句和 ENDFOR 语句必须成对出现，不能单独使用，且必须各占一行。FORENDFOR 循环可以嵌套使用。但每一层的循环变量应唯一。内层循环应完全在外层循环体

42、内，内外循环不得互相交叉。FORENDFOR 循环遵循“先检查，后执行”的原则，在下列两种情况下，“循环体”不被执行： 当步长为正数时，初值大于终值。 当步长为负数时，初值小于终值。所以，循环体最少执行 0 次。当初值等于终值时，均执行一次“循环体”。循环次数=INT（终值-初值）/步长+（1）。如果在 FORENDFOR 之间改变循环变量的值，将影响循环执行的次数。（2）DO WHILE命令格式：DO WHILE 逻辑表达式循环体LOOPEXITENDDO说明：该语句根据逻辑表达式的值，决定是否重复执行“循环体”。逻辑表达式的值为真，执行“循环体”，遇到 ENDDO 后返回 DO WHILE

43、 再次计算逻辑表达式是否为真，如此循环往复直至逻辑表达式的值为假时，则跳过“循环体”，执行 ENDDO 后面的语句。LOOP 子句可以放在“循环体”中的任意位置，当程序执行到该子句时，则返回 DO WHILE 重新判断逻辑表达式。EXIT 子句可以放在“循环体”中的任意位置，当程序执行到该子句时，则无条件跳出循环，执行 ENDDO 后面的语句。DO WHILE 与 ENDDO 必须成对使用。该语句也可以嵌套使用。（3）SCAN命令格式：SCAN 范围 FOR 条件 1 WHILE 条件 2循环体LOOPEXITENDSCAN说明：SCAN 语句类似于循环语句 DO WHILEENDDO 或 F

44、ORENDFOR，只不过是专门针对数据表的循环。SCAN 语句在打开的数据表中，自动移动记录指针，将记录从头到尾扫描一遍，每移动一次记录指针，就执行一次循环体。该语句要求必须先打开一数据表。范围，在指定记录范围内扫描打开的数据表。FOR 条件 1 WHILE 条件 2，根据给定的条件，只扫描符合条件的记录。如果不带范围和条件子句，则默认扫描表中的全部记录。LOOP 子句可以放在程序段中的任何地方，当程序一旦执行到该子句时，则返回 SCAN 重新执行。EXIT 子句可以放在程序段中的任何地方，当程序一旦执行到该子句时，则无条件跳出循环，执行 ENDSCAN 后面的语句。4.3【案例 17】使用子

45、程序和函数进行程序设计案例描述编写代码的时候经常会遇到同一段代码在不同的地方执行多次的情况。将代码放入子程序或者函数中，可以方便其他地方调用执行。函数是 Visual FoxPro 6.0 的重要组成部分。VisualFoxPro 6.0 中的许多操作和功能都是通过函数实现的。相关知识1子程序概述编写代码的时候经常会遇到同一段代码在不同的地方执行多次的情况。可以把需要重复使用的代码单独保存在扩展名为.prg 的程序文件中，供其他程序反复调用，这样的程序文件就是Visual FoxPro 6.0 中的子程序。使用子程序可以避免程序冗长，提高程序可读性，缩短开发周期。例如，有两个程序文件分别为 A

46、.prg 和 B.prg。&主程序 A.prgACCEPT 请输入表名： TO FILENAMEUSE &FILENAMEACCEPT 请输入要查询的编号： TO STUIDDO B&子程序 B.prgLOCATE FOR 编号=STUIDDISPRETURN&调用程序 B&返回主程序当程序 A 执行到 DO B 这一语句时，转去执行 b 程序，当 B 程序执行到 RETURN 语句时返回 A程序，继续执行 A 程序 DO B 语句之后的语句。这种情况称为 A 程序调用 B 程序，A 是主程序，B是子程序。主程序、子程序是相对的。假如 B 程序又调用另一个程序 C，那么 B 程序就是 C 程序

47、的主程序，C 程序就是 B 程序的子程序。注意每个子程序至少有一个 RETURN 语句，并将该语句放到最后，在 RETURN 语句后面的语句不会被执行。在实际的编写代码的过程中经常发现，程序中重复出现的多是处理数据一些步骤，但是每次处理的数据对象却有所不同，这时用前面介绍的方法就难以编写出合适的代码。解决这种问题就要采用带参数的子程序了。所谓“参数”就是向子程序传递的信息。它可以是一个字符串，也可以是一个数值。用 PARAMETERS 声明的变量被称为形式参数，如果多于一个参数，则参数之间用逗号分开。形式参数只是一个参与运算的符号，没有任何实际的值，只有在子程序被调用时，才由主程序的WITH

48、关键字后的实际参数指出要传递给子程序的数据。需要强调的是形式参数和实际参数的个数必须一致，顺序必须对应。二者对应参数的数据类型必须一致。子程序还可以通过参数返回一些值供主程序来引用，以便进行其他的运算。例如，下面的程序中，主程序用变量 R 接收圆的半径，调用子程序的时候将 R 的值作为实际参数传递给子程序CIR.prg 中的形式参数 I。子程序将根据 I 计算出的圆面积存入形式参数 J 中，返回主程序时，将 j 的值传递给主程序的实际参数 S。由主程序输出实际参数 S 的值。&子程序 CIR.prgPARAMETERS I,J&定义形式参数 I 和 JJ=3.14*I*IRETURN&主程序

49、MAIN.PRGCLEARINPUT 请输入圆的半径： TO RS=0DO CIR WITH R,S?半径为+ALLTRIM(STR(R)+圆的面积为：,S2过程概述在编写一个大型程序时，可能有许多段代码需要重复使用，如果都写成子程序，就要创建很多.prg 文件。由于每个子程序都作为单独的文件处理，所以过多的子程序会带来加载文件耗时的问题，而且不便于管理。因此需要引入“过程”的概念。其实过程和子程序非常相似，只是将多个子程序保存在同一个.prg 文件中。在.prg 文件中每个子程序单独定义。而含有多个子程序的.prg 文件称为“过程文件”。当然还可以将过程放在主程序的结尾，但不能把主程序代码放

50、在过程之后。在过程文件中编写子程序必须先对子程序进行定义，否则多个子程序就会混在一起，无法分清。过程的定义形式如下：PROCEDURE 过程名PARAMETERS 参数 1,参数 2.过程体RETURN TO 程序名其中 PROCEDURE 是标识开始过程定义的关键字，“过程名”是标识此过程的名字，此名必须唯一。此处应尽可能使用能表达过程主要功能的名称。PARAMETERS 和 RETURN 的用法和子程序的用法一样，就不再赘述。调用过程的方法和调用子程序的方法近似。但是要注意在调用过程时要指出调用的过程包含在哪个过程文件中，方法有两种：（1）DO 语句命令：DO 过程名 WITH 参数表 I