将变量作为参数传递与传递另一个函数的返回值时出现“无效过程调用”错误

我收到错误：

无效的过程调用或参数：“AddRange”

当传递一个变量到ArrayList.AddRange() https://msdn.microsoft.com/en-US/library/zhfwys3c%28v=vs.110%29.aspx，但是当我传递函数的返回值时，代码工作正常，即

My list:

Dim Foo
Set Foo = CreateObject("System.Collections.ArrayList")

添加返回的新列表GetList()工作正常：

Call Foo.AddRange(GetList()) ' works fine

Function GetList()
  Set GetList = CreateObject("System.Collections.ArrayList")
End Function

但传递一个带有变量的新列表（x) 引发错误：

Dim x
Set x = CreateObject("System.Collections.ArrayList")

Call Foo.AddRange(x)  ' error: invalid procedure call or argument: 'AddRange'

到底是怎么回事？

看起来您需要按值传递数组列表。这有效：

Call Foo.AddRange((x))

内部括号组导致参数被传递ByVal代替ByRef.