实现vbs中传递不定参数

今天被问到一个问题：写一个函数，但是这个函数的参数个数是可变的，该怎么写？我记得c中是有可变参数的写法的，java中也有，由于对vbs不是很熟，只是了解九牛之一毛，于是想当然认为vbs也有。google一把，发现vbs真的没有这个功能。没办法，没有标准的方法，咱就模拟一个，所谓曲径通幽，过程虽然曲折，但是达到目的就行，下面就是用byref和数组模拟的一个可变参数函数：
function   test(ByRef   paralist)                                                       
  For Each param In paralist
   MsgBox param
  Next
 End   Function 

Dim arr(1)
arr(0) = "a"
arr(1) = "b"

test(arr)

这个方法简单明了，容易操作