课件：VF第08章.pptVIP

8.5 程序的模块设计 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 调用过程 格式: DO 过程名 [WITH 参数表][IN 过程文件] 过程文件 过程文件的建立与编辑和程序文件一样。 过程文件中可包含若干个过程或自定义函数。 每个过程或函数至少含有一个RETURN语句。 说明 如果过程放在过程文件中,由[IN 过程文件] 指定过程文件。 8.5 程序的模块设计 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 打开过程文件 格式: SET PROCEDURE TO 过程文件名 关闭过程文件 格式1：CLOSE PROCEDURE 格式2：RELEASE CLOSE PROCEDURE 格式3：SET PROCEDURE TO 【例8-15】设计一个计算求阶乘的过程,通过过程文 件来实现。调用此过程计算1!+2!+3!+4!+5!的值。 CLEAR SET PROCEDURE TO FACTOR S=0 F=0 FOR K=1 TO 5 DO JC WITH K,F S=S+F NEXT ? S=,S SET PROCEDURE TO RETURN 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 8.5 程序的模块设计 主程序HE.PRG 【例8-15】设计一个计算求阶乘的过程,通过过程文 件来实现。调用此过程计算1!+2!+3!+4!+5!的值。 PROCEDURE JC PARAMETERS N,P P=1 FOR I=1 TO N P=P*I ENDFOR RETURN 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 8.5 程序的模块设计 过程文件:FACTOR.PRG 8.5 程序的模块设计 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 参数传递 在调用有参数的模块时，首先实现的是调用程序和 被调程序之间的数据传递—参数传递 实参 由调用程序传递过去的参数。 形参 出现在过程或自定义函数表中的参数为形式参数。 说明 在调用过程或自定义函数时,实际参数被传递到对 应的形式参数中。实参到形参的传递是按顺序进 行的,实参与形参一一对应。实参个数不能多于形 参个数,对应位置的参数类型要一致。 8.5 程序的模块设计 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 参数传递方式 传递方式有两种：按值传递参数和按地址传递参数。 (1)按值传递参数:将实参的数值传给形参,当形参的 数值改变时,不会影响实参的数值。 (2)按地址传递参数:把实参所在的内存地址单元传递 为形参,即它们共用同一个地址空间。因此,在形参的 数值变化时,自然会使实参的数值发生变化。 (3)默认的情况下,通过值将参数传递给自定义函数, 通过地址将参数传递给过程。 设置传递参数的方法有以下几种: ① SET UDFPARMS TO REFERENCE:地址传递； ② SET UDFPARMS TO VALUE:值传递； ③ 用括号括起来的变量为值传递, 在变量前加“@”符号，则为地址传递； ④ 当数组为参数时，必须是地址传递。 【例8-16】 主程序值传递参数。 CLEAR X1=1 X2=2 DIMENSION X(3) X=3 DO SUB1 WITH (X1),(X2),X PROCEDURE SUB1(T1,T2,T) T1=T1+1 T2=T2+1 T(1)=T(1)+1 RETURN 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 主程序 ? X1,X2,X(1) RETURN 8.5 程序的模块设计 X1、X2为值传递 X数组为地址传递 X1、X2的值不变 X(1) 元素值改变 运行结果:1 2 4 8.6 变量的作用域 变量的作用域 全局变量 局部变量 私有变量 程序模块设计 自定义函数 参数传递 过程 子程序 变量作用域 变量起作用的范围。 在VFP系统中,提供了三种变量的作用范围。 全局变量PUBLIC 格式:PUBLIC 内存变量表 说明 ① 在命令窗口中定义的变量都是全局变量,但它们不 能在程序方式下使用。 ② 全局变量在程序终止执行时，不会自动清除。 ③ 全局变量先定义后使用。 ④变量的初值均赋为.F.