Question

VB自定义函数是否允许由用户决定参数的个数？

比如f（参数个数，参数1，参数2，参数3，……，参数n）输入时 返回值= f（3,1,2,3）或者可以把数组作为一个参数，数组中的每一项都是一个参数

Answer 1

楼主说的参数叫可变参数，可以使用ParamArray关键字定义可变参数
在形参表中定义
ParamArray 数组名()
即可创建一个数组，该数组存储用户输入的参数。

举例：
Sub Add(ParamArray list())
Dim sum As Integer, i As Integer
For i = LBound(list) To UBound(list)
sum = sum + list(i)
Next i
MsgBox "sum=" & Str(sum)
End Sub

Private Sub Form_Load()
Add 1, 2, 3, 4, 5
End Sub
过程Add可将传递过来的参数加起来，和 为sum，然后用MsgBox将和输出。