急!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,跪求大神指点~~~比较着急,在线等回复,谢谢了!
要是能直接发一段代码附上注释就再好不过了


...全文
1547 8 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
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

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧