VB函数能一次返回多个值或者数组吗？

不能。
所以大家通常用Sub来代替Function。
在外部申请一个数组变量来储存。
dim result() as ....
sub ret()
.....
....
result(..)=....
end sub
'于是，result()就是相当于Function所返回的结果了。