使用 ParamArray 关键字可以使函数接收数目可变的参数。在下面的定义中，FirstArg 是按值传递的。
Function CalcSum(ByVal FirstArg As Integer, ParamArray OtherArgs())
Dim ReturnValue
'如果用如下代码调用该函数：
ReturnValue = CalcSum(4, 3 ,2 ,1)
'则局部变量被赋予以下值：FirstArg = 4，
'OtherArgs(1) = 3，OtherArgs(2) = 2，等等。
'假设缺省数组下界 = 1。