vfp-05习题.ppt

（1）存储在数据库的存储过程中。 （2）以一个程序文件保存。这时FUNCTION和PROCEDURE语句可省， 程序文件名可以作为过程名或函数名。 （3）放在调用程序之后。这时调用程序和过程（或用户自定义函数）的 定义保存在同一个程序文件中。 （4）存放在过程文件中。 过程或用户自定义函数的存储方式： 过程文件是一个保存多个过程或用户自定义函数的程序文件。 过程文件不能用DO命令直接运行。 使用过程文件时必须先在程序中打开过程文件，然后才可以调用其中的过程或用户自定义函数。 打开过程文件的命令：SET PROCEDURE TO [FileName] 5.5 过程和用户自定义函数 过程与用户自定义函数的调用 格式1：DO Procedure [IN FileName] [WITH ParameterList] IN子句用于指定过程或用户自定义函数所在的过程文件 WITH子句用于指定传递给过程或用户自定义函数的参数 如：DO tarea WITH 2,3,4 格式2：与系统函数的调用方式相同，这种调用方式有返回值。 如：tarea(2,3,4) 5.5 过程和用户自定义函数 说明： (1)形参和实参的数目一般应一致，发生调用时对应位置的实参与形参 一一传递。 (2)也可以形参的数目多于实参，在这种情况下，剩余的形式参数就被 初始化为.F.。 (3)如果实参数目多于形参，运行程序时系统会提示出错。 实参与形参 将在PARAMETERS语句ParameterList中的参数称为“形式参数” 在调用语句中的参数称为“实际参数” 5.5 过程和用户自定义函数 n=1 t=1/n s=0 DO WHILE t0.0001 s=s+t n=n+2 t=1/jc(n) n为实参 ENDDO ?”数列的和是：”,s 例16： 计算数列1/1!、1/3!、1/5!、…、1/n!的和，当某项的值小 于0.0001时停止计算。 FUNCTION jc PARA m m为形参 ss=1 FOR i=1 TO m ss=ss*i ENDFOR RETURN ss ENDFUNC 5.5 过程和用户自定义函数 例17： 计算数列1/1!、1/3!、1/5!、…、1/n!的和，当某项的值小 于0.0001时停止计算。采用DO命令调用用户自定义函数jc n=1 t=1/n s=0 DO WHILE t0.0001 s=s+t n=n+2 p=1 DO jc WITH n,p t=1/p ENDDO ?”数列的和是：”,s FUNCTION jc PARA m,ss FOR i=1 TO m ss=ss*i ENDFOR ENDFUNC 5.5 过程和用户自定义函数 2、运行下面的程序段后,屏幕显示的运行结果是 。 CLEAR SET TALK OFF STORE 3 TO n ?ss(n) FUNCTION SS PARAMETERS X y=1 p=0 FOR i=1 TO x y=y*i p=p+y ENDFOR RETURN P ENDFUNC 9 习题 变量的作用域 内存变量可分为: 全局变量，私有变量和本地变量三类。 全局变量: 在任何模块中都可使用的变量。 建立全局变量的语法格式：PUBLIC VarList 功能：将内存变量设置为全局变量，并为这些变量赋初值.F.。 说明： （1）若下层模块中建立的内存变量要供上层模块使用，或某模块中 建立的内存变量要供并列模块使用，必须将这种变量说明成全 局变量。 （2）Visual FoxPro中，默认命令窗口中定义的变量都是全局变量。 （3）程序终止执行时全局变量不会自动清除，而只能用RELEASE或 CLEAR ALL命令来清除。 5.5 过程和用户自定义函数 私有变量: 仅在定义它的模块及其下层模块中有效，而 在定义它的模块运行结束时自动清除 5.5 过程和用户自定义函数 声明私有变量的语法格式：PRIVATE Var