VF用外部过程，内部过程，过程文件求1到10的阶乘和！

Answer 1

VFP内部过程就是过程文件：

把以下两段代码写入同一个文件中，保存为JCH.PRG文件，即形成一个过程文件。

**JCH.PRG文件的代码
**以下为主程序
jch=0
jcs=0
FOR l=1 TO 10
 DO jc WITH l,jcs  &&调用子程序，并通过传递参数实现计算阶乘
 jch=jch+jcs
ENDFOR
?"10 的阶乘为：",jcs,"10 以内各自然数的阶乘和为：",jch

**以下为子程序
PROCEDURE jc
PARAMETERS n,jcs      &&接收主程序传递来的参数
jcs=1
FOR m=1 TO n
 jcs=jcs*m
ENDFOR 
RETURN jcs

如果需要外部过程方法编程，主程序与子程序分别保存。此例中，我们将主程序（上面第一段代码）保存成JCH.PRG文件。把子程序（以上第二段代码）去掉第一行代码，保存为JC.PRG文件即可。如下：

**以下为JC.PRG文件的代码
PARAMETERS n,jcs      &&接收主程序传递来的参数
jcs=1
FOR m=1 TO n
 jcs=jcs*m
ENDFOR 
RETURN jcs

按以上操作后，可以通过：DO JCH.PRG执行查看效果。