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

2014-05-08 09:55:43 2.1k 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

dida_20140507 墨衍会员 · AI 创作全网分发关注 + 加入社区

VB 一个Function传回多个值解决Function只能传回一个值的问题-------------------------------------------------------------------------------- ●用Function当成子程序的一个好处，就是Function本身可以传回一个值到上一层呼叫的子程序里，但问题来了，若为了工作上的需要，想一次传回一个以上的值，那该怎么办？ Priv 阅读详情

论坛上有人说是通过数组来实现返回多个值，但我还是没有看懂，求指点！！！
例如：
需要对不同的n，d值进行一系列计算，返回x，y值
我就先假定计算过程为
x=n+d
y=n*d
怎么编写function函数，调用的时候就可以直接由不同的（n,d）计算然后同时返回x，y的值呢？？？

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

...全文

Ansys Zemax与Speos协同设计：从HUD光学优化到驾驶环境可视化全流程解析本文深入解析了如何利用Ansys Zemax与Speos进行协同设计，实现从HUD光学系统核心优化到驾驶环境可视化验证的全流程。文章强调了HUD设计是光学性能与视觉感知的深度耦合，通过Zemax进行精密光学设计，再利用Speos进行系统级仿真与感知模拟，最终完成从虚拟到现实的闭环验证，有效提升HUD产品的开发效率与可靠性。阅读详情

dida_20140507

VB基础类 7,788 成员 197,583 内容

+ 关注 + 加入社区

切换为时间正序

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中function函数返回多值怎么实现

相关推荐