使用 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。