题目

VFP的程序题 最好能有详解
下列程序段执行后,PAR1= （8） ,PAR2= （9） .
SET UDFPARMS TO REFERENCE
PAR1=2
PAR2=10
K=PFH(PAR1,PAR2/2)
PAR1,PAR2
FUNCTION PFH
PARAMETERS M,N
SUM1=0
FOR I=M to N
SUM1=SUM1+I*I
NEXT I
M=SUM1
N=M+SUM1
RETURN SUM1
（8） （9)是空格

提问时间：2021-10-14

答案

这是一个考查关于参数传递的题目：
SET UDFPARMS TO REFERENCE,模块程序按引用传递参数；
PAR1=2,对参数赋初值；
PAR2=10
K=PFH(PAR1,PAR2/2),执行带参数的模块程序pfh；
?PAR1,PAR2,返回执行模块后的变量值；
FUNCTION PFH,模块程序段开始；
PARAMETERS M,N,声明m,n,为模块程序中的私有变量,接收值为m=2,n=10/2=5；
SUM1=0,对变量赋初值；
FOR I=M to N,循环开始,相当于for i=2 to 5；
SUM1=SUM1+I*I
NEXT 循环结束 ,此时sum1值=54；
M=SUM1 将sum1的运算结果赋值给m；
N=M+SUM1
RETURN SUM1 结束模块程序返回上级程序
,同时返回par1的值；