function - 调用存储在字符串变量中的函数名？

Question

我正在使用 VBScript，我想知道是否有任何方法可以调用存储在字符串变量中的函数名？

这是我的尝试？

a = "b"

sub b() 
    msgbox "c"
end sub

a()

但它总是导致错误

类型不匹配'a'

Answer 1

正确答案是：使用 GetRef() 如下：

Function F(p)
  F = p + p
End Function

Dim FP : Set FP = GetRef("F")

WScript.Echo FP("a")
WScript.Echo FP(123)

输出：

aa
246

Answer 2

似乎例如这应该工作：

Dim a
a = "Call b()"
Eval(a)

Sub b
   ' Do stuff
End Sub

Answer 3

Dim x

Sub b

 print "xxx"' Do stuff
End Sub

x = "call b()"

Execute(eval("x"))