能不能使用一次function而返回两个数组？该怎么处理

能不能使用一次function而返回两个数组？
如题~~~~~
我想使用一次function而得到两个结果~~
不会弄

[解决办法]
sub ABC(byref sAry1() as string,byref sAry2() as string)
end sub
[解决办法]
返回二个结果还是二个数组？
二个结果有多种方法，看你的意思好象要返回数组：

VBScript code

function test(a as string) as string()    dim i as integer    dim arr() as string    redim arr(1 to len(a))    for i=1 to len(a)        arr(i)=mid(a,i,1)    next    test=arrfunction
[解决办法]
可以通过byref参数类型