Question

请问这道VFP题怎么解

Answer 1

clear
b="x1"
x1=10
do p1 with b
? x1
retu

procedure p1
para y
private y
&y=&y+10
retu

结果为20

追问

请问下面的y不是定义为私有变量了么，怎么还可以返回值

追答

前面还定义了para呢 ！ 其实不用定义私有变量，它隐含就是私有的。

追问

可以这么理解么，像这种参数传递的题，只有本地变量定义以后才不会反悔，全局变量和私有变量没有影响？

追答

在子程序中，除非用public定义全局变量，那么就都是私有变量了。
主、子程序通过虚实结合传递参数。

追问

可是最后返回给的是b啊，但是要求输出的是X1.不应该是10么

追答

主程序定义的x1隐含是私有变量，其作用域涵盖了子程序。如果你在子程序中用local重新定义x1，会有不同的效果。
clear
b="x1"
x1=10
do p1 with b
? x1
retu

procedure p1
para y
* private y
local x1
x1=1
&y=&y+10
retu