| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4186 人关注过本帖
标题:自定义函数如何返回多个值或对象
只看楼主 加入收藏
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
结帖率:76.47%
收藏
已结贴  问题点数:20 回复次数:13 
自定义函数如何返回多个值或对象
自定义函数如何返回多个值或对象,return只能返回一个值,只能用public a1,a2,……吗?
搜索更多相关主题的帖子: 多个 对象 自定义 返回 函数 
2019-09-06 09:54
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
收藏
得分:0 
FUNCTION otest_connection(yname,ypass,robj,rconn)

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

ENDFUNC
2019-09-06 10:35
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:282
专家分:613
注 册:2012-9-21
收藏
得分:3 
FUNCTION ABC(AA1,BB1)
LPARAMETERS AA1,BB1
AA='11'+AA1+' 22 '+BB1

……
……

RETURN AA
ENDFUNC

*  F=ABC('F','G')
*  ? F &&F='11F 22 G'
2019-09-06 11:12
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
收藏
得分:0 
以下是引用zhken在2019-9-6 11:12:23的发言:

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单个值
2019-09-06 11:15
radiofan
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:466
专家分:696
注 册:2006-7-30
收藏
得分:0 
以下是引用radiofan在2019-9-6 10:35:03的发言:

FUNCTION otest_connection(yname,ypass,robj,rconn)

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

ENDFUNC

可以根据用户定义返回通过robj和rconn传入的多个值。
2019-09-06 11:16
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9782
专家分:26837
注 册:2012-2-5
收藏
得分:3 
通过数组解决问题

坚守VFP最后的阵地
2019-09-06 11:45
mrytfeiup
Rank: 1
等 级:新手上路
帖 子:1
专家分:3
注 册:2019-9-9
收藏
得分:3 
返回   数组  结构 地址
2019-09-09 11:27
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:600
专家分:1770
注 册:2017-7-16
收藏
得分:3 
我的认识是这样的,子程序有两种,过程与函数
如果要返回唯一的一个值,请设置成函数
函数有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编辑过]

2019-09-09 13:57
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2195
专家分:3828
注 册:2007-4-27
收藏
得分:3 
谢谢,学习了……

只求每天有一丁点儿的进步就可以了
2019-09-09 14:36
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10527
专家分:42899
注 册:2014-5-20
收藏
得分:3 
返回一个表,数据够多了吧
2019-09-09 20:46
快速回复:自定义函数如何返回多个值或对象
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015822 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved