我想编写一个接受数组作为参数的函数。该数组可以包含任意数量的元素。
Function processArr(Arr() As Variant) As String
Dim N As Variant
dim finalStr as string
For N = LBound(Arr) To UBound(Arr)
finalStr = finalStr & Arr(N)
Next N
processArr = finalStr
End Function
我是如何尝试调用函数的:
Sub test()
Dim fString as string
fString = processArr(Array("foo", "bar"))
End Sub
我遇到了一个错误:
编译错误:类型不匹配,需要数组或用户定义类型。
我做错了什么?
Function test(ByRef arr() As Variant)
。 - Christian