将参数传递给动态命名函数

Question

我想调用一个带有动态名称的函数，可以使用Eval：

来完成

fName = "TestFunction"
Call Eval(fName)

这很好用，但如何将参数传递给此函数调用？这样的事情不起作用：

Call Eval(fName)(Param1, Param2)

Answer 1

如果您使用Eval，则需要准备要执行的代码

Call Eval(fName & "(" & Param1 & "," & Param2 & ")" )

您正在尝试的是GetRef

Call GetRef(fName)(Param1, Param2)

Answer 2

Function Add(int1, int2)
    Add = int1 + int2
End Function

intSum = Eval("Add(1, 2)")
' or...
intSum = Eval("Add(" & intParam1 & ", " & intParam2 & ")")