第15讲 第9章结构化程序设计六.ppt

程序的模块化 一、子程序 二、过程 三、自定义函数 四、公有变量、私有变量和本地变量 五、过程与自定义函数的递归调用 一、子程序 （一）子程序的概念 在模块化程序设计方法中，我们将一段具有相对独立和通用性的完整的程序段称为子程序。 （二）子程序的建立与调用 子程序建立与一般程序的方法相同，只是要在子程序的适当位置加上返回语句。 返回语句： RETURN 调用子程序语句： DO <子程序文件名> 功能：程序运行到 DO 语句时，将指定的子程序调入内存并执行；当执行到 RETURN 语句时，返回到调用该子程序的主程序，并执行调用语句的下一条可执行语句。 例1：子程序的简单调用 *main.prg clear for i=1 to 4 ?"调用子程序sub" do sub next return （三）子程序的嵌套 程序的嵌套就是主程序调用子程序，子程序又调用子程序的过程。 返回语句的其他用法： RETURN [ TO 程序名| TO MASTER ] （1）若选择[TO 程序名]，则直接返回指定的程序文件。 （2）若选择[TO MASTER]，则不论有多少级调用都直接返回第一级主程序。 二、过程 （一）过程 过程与子程序基本相同，但过程可以存在于调用它的主程序中，作为主程序的一部分，还可以放在过程文件中。 1. 过程定义 格式： PROCEDURE <过程名> <语句序列> RETURN [ENDPROC] 功能：定义一个过程，该过程可以在程序中调用。 2. 过程的调用 格式： DO <过程名> 功能：调用并执行指定的过程。 （二）过程在主文件中 过程可以直接在主文件中书写，此时，每个过程只要以PROCEDURE <过程名>进行声明即可； 过程必须写在主程序后面！ 例2：求1-100之间的奇数和与偶数和 （三）过程文件 1.将多个过程放置在一个程序文件中，此文件为过程文件。 2.过程文件(.prg)的建立方法与一般程序文件的建立方法相同。 modi comm <过程文件名> 与子程序相比，使用过程文件后，可以减少程序中打开文件数目和访问磁盘次数，提高程序运行效率。 过程文件的基本格式： procedure <过程名1> <语句序列1> Return procedure <过程名2> <语句序列2> Return ………… procedure <过程名N> <语句序列N> return 在同一个过程文件中的过程不能同名 3. 要使用过程文件中的过程，必须先将过程文件打开，语句为： SET PROCEDURE TO <过程文件名> 使用完毕后要关闭过程文件，语句为： set procedure to | close procedure 也可以不打开过程文件，直接调用过程： DO <过程名> IN <过程文件名> 例3：求1-100之间的奇数和与偶数和 过程的查找顺序： 调用过程的主文件 → 已打开的过程文件 → 独立的子程序文件 （四）过程调用中的参数传递 在调用子程序或过程时，可以给子程序传递参数，使子程序根据参数进行运算。 1. 发送数据的调用语句格式： 格式：DO <子程序名> WITH <实参表> 功能：在调用子程序的同时将<实参表>中的参数值传送给子程序中对应的变量。 注意：带参数调用子程序时，子程序必须要有一个专用语句接收此参数，且此语句必须是过程的第一个语句。 2. 子程序（过程）中接收参数语句 格式：parameters <形参表> 功能：接收DO ... WITH...语句中<实参表>中提供的参数，并把它传送给<形参表>中对应变量，供本子程序或过程使用。 注意： 1）DO语句中<实参表>的参数可以是各种类型的常量、变量或表达式，但必须与 parameters 语句中<形参表>的变量个数、类型相同。 例4： clear ?"调用子程序sub" do sub with 10 return proc sub para n for j=1 to n ?space(n-j) ??replicate("*",2*j-1) next return 2）如果在实参表中用内存变量单独作为参数时，FoxPro规定以“传地址”的方式进行参数传递。即：在过程中对形参变量进行修改，返回后新的值将传递给对应的实参变量。 3）如果将实参表中内存变量用()括起来，则FoxPro 规定以“传值”的方式进行参数传递。即：在过程中对形参变量进行修改，返回后新的值将不传递给对应的实参变量。 例5：计算矩形面积 clear l=2 w=3 s=0 do area with l,w,s ?"矩形面积为：",s return procedure area param