189 8069 5689
在VB中，一个function只能用一个return语句返回一个值。哪怕有几个return语句，也只能执行一个。
创新互联公司是一家朝气蓬勃的网站建设公司。公司专注于为企业提供信息化建设解决方案。从事网站开发，网站制作，网站设计，网站模板，微信公众号开发，软件开发，成都小程序开发，10年建站对围栏护栏等多个行业，拥有丰富建站经验。
如果需要返回多个值，可以使用数组，数组的每一个元素值都可以带回来。
单个变量只能在在VB中，一个function只能用一个return语句返回一个值。哪怕有几个return语句，也只能执行一个。
如果需要返回多个值，可以使用数组，数组的每一个元素值都可以带回来。
单个变量只能使用by在VB中，一个function只能用一个return语句返回一个值。哪怕有几个return语句，也只能执行一个。
如果需要返回多个值，可以使用数组，数组的每一个元素值都可以带回来。
单个变量只能在声明函数的某个参数时使用byref前缀。
其他方法如使用全局变量等，已经不属于返回值的问题了。
如果不用byref传址方式，而是byval传值方式调用参数，就要用到function来实现，sub是不行的。function的返回值可以是一个数组，只包含两个元素，或者返回一个字符串，形式类似 a|b，然后接收到字符串了以后分割一下，就可以得到交换后的值了。其实这样反而麻烦，还不如在程序内部调用。
不但可以返回两个值，还可以更多。例如 4 个。
Private Sub Command1_Click()
Dim My1 As Boolean, a1 As Long, a2 As String, a3 As Long
My1 = MyFun(1,a1, a2, a3)
'显示返回的 4 个变量的值
Me.Cls
Me.Print My1
Me.Print a1
Me.Print a2
Me.Print a3
End Sub
Private Function MyFun(S as long ,a1 As Long, a2 As String, a3 As Long) As Boolean
MyFun = True
a1 = 100
a2 = "MyStr"
a3 = "200"
End Function
要返回多个值，有几种办法，最直接的就是用传址参数
Function f1(byref retVal1,byref retVal2)
或者用全局变量（比如模块级变量）
或者返回包装过的对象
或者返回多个返回值糅合的字符串