函数只能返回一个唯一的数据，要达到返回多个值，可以使用用 ByRef 声明的参数来能实现；
例如：声明函数（也可以用过程）
Function 函数1（ByRef y1 as Integer,ByRef y2 as Integer,ByRef y3 as Integer） As Integer
y1 = 2
y2 = 4
y3 = 6
End Function
调用
dim r1 as integer
dim r2 as integer
dim r3 as integer
dim y as integer
y= 函数1(r1,r2,r3)
Print r1,r2,r3
看看结果，就理解这个方法返回了3个值.
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024