十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
在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)
或者用全局变量(比如模块级变量)
或者返回包装过的对象
或者返回多个返回值糅合的字符串