自定义函数如何返回多个值或对象，return只能返回一个值，只能用public a1，a2，……吗？

FUNCTION otest_connection(yname,ypass,robj,rconn)

        PUBLIC &robj,&rconn
……
……
……
            &robj = testobj
            &rconn = testconn
            RETURN .T.

ENDFUNC

FUNCTION ABC(AA1,BB1)
LPARAMETERS AA1,BB1
AA='11'+AA1+' 22 '+BB1

……
……

RETURN AA
ENDFUNC

*  F=ABC('F','G')
*  ? F &&F='11F 22 G'

只能返回AA单个值

可以根据用户定义返回通过robj和rconn传入的多个值。

通过数组解决问题

返回   数组  结构 地址

我的认识是这样的，子程序有两种，过程与函数
如果要返回唯一的一个值，请设置成函数
函数有PROC开头最后必须通过RETURN返回唯一值
默认情况下函数是按值传递。
如果要返回多个值或者不返回值，请设置成过程
过程用PROC开头，最后不用写RETURN语句
默认情况下过程是按地址传递。
下面是一个返回多个值的过程的实例
请朋友自己琢磨琢磨。

CLEAR
x=6
y=5
z=9
?x
?y
?z
?
DO zcx WITH x,y,z
?x
?y
?z

************
PROCEDURE zcx
PARAMETERS mx,my,mz
mx=mx*2
my=my+mx
mz=mz-1
ENDPROC

[此贴子已经被作者于2019-9-9 14:03编辑过]

谢谢，学习了……

返回一个表，数据够多了吧