急!VB中function函数返回多值怎么实现

dida_20140507 2014-05-08 09:55:43
论坛上有人说是通过数组来实现返回多个值,但我还是没有看懂,求指点!!!
例如:
需要对不同的n,d值进行一系列计算,返回x,y值
我就先假定计算过程为
x=n+d
y=n*d
怎么编写function函数,调用的时候就可以直接由不同的(n,d)计算然后同时返回x,y的值呢???



我现在刚开始应用VB,跪求大神指点~~~比较着急,在线等回复,谢谢了!
要是能直接发一段代码附上注释就再好不过了


...全文
1070 8 打赏 收藏 举报
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
beal_p 2014-05-09
因为 可以通过 function xxx() as string 返回一个字符串 所以, 你可以把想要返回的值通过 ,连接成字符串返回,用到时再分割一下就达到了返回数组的效果。 或者定义一个 type typTest, 把想要的参数都放在type里, 然后通过 function xxx() as typTest 来取得返回的各值
  • 打赏
  • 举报
回复
dida_20140507 2014-05-09
引用 7 楼 beal_p 的回复:
因为 可以通过 function xxx() as string 返回一个字符串 所以, 你可以把想要返回的值通过 ,连接成字符串返回,用到时再分割一下就达到了返回数组的效果。 或者定义一个 type typTest, 把想要的参数都放在type里, 然后通过 function xxx() as typTest 来取得返回的各值
谢谢!这个方法我之前也看到过,不过我昨天用yachong的方法已经把问题解决了呢,还是谢谢你哈~~
  • 打赏
  • 举报
回复
dida_20140507 2014-05-08
引用 3 楼 yachong 的回复:
不关心返回值的话就用sub好了 要声明成public sub
哦哦好的,我明白了,晚上再试试~谢谢了!
  • 打赏
  • 举报
回复
王二.麻子 2014-05-08
竟然。。。 混分了,哎
  • 打赏
  • 举报
回复
王二.麻子 2014-05-08
引用 1 楼 yachong 的回复:
不一定要用返回值,用参数带回来也行 private function xxx(byval n as long ,byval d as long ,byref x as long ,byref y as long ) x=n+d y=n*d end function dim x as long ,y as long call xxx( 2,3,x,y) print x,y
byval?你是想说byref吧?
  • 打赏
  • 举报
回复
yachong 2014-05-08
不关心返回值的话就用sub好了 要声明成public sub
  • 打赏
  • 举报
回复
dida_20140507 2014-05-08
第一次发帖,非常感谢您的回复!!! 刚刚我运行了一下,确实可以达到预期效果, 我还想请教下,如果想让整个工程都能调用的话,是不是可以新建标准模块,用sub过程啊?还是就用function函数就可以?
  • 打赏
  • 举报
回复
yachong 2014-05-08
不一定要用返回值,用参数带回来也行 private function xxx(byval n as long ,byval d as long ,byref x as long ,byref y as long ) x=n+d y=n*d end function dim x as long ,y as long call xxx( 2,3,x,y) print x,y
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类
加入

7592

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2014-05-08 09:55
社区公告
暂无公告