在VBScript中实现-函数/方法名作为参数传入另一个函数

在JS中有这种用法，某个函数名可以当成参数的形式，传入到另外一个函数内部去，例如：
<script type="text/javascript">
<!--
function myFuncA(str,myFuncB){
 str = str + " 您好!";
 str = myFuncB(str);
 return str;
}
function myFuncB(str){
 str = str + "欢迎来到IECN.NET";
 return str;
}
alert(myFuncA("张三",myFuncB));
//-->
</script>

在VBScript有两种方式可以来实现，即用execute或GetRef 函数。
一、利用execute：
<script language=vbscript>
Function myFuncA(str,myFuncName)
 str = str & " 您好!"
 execute("str = " & myFuncName & "(str)")
 myFuncA = str
End Function

Function myFuncB(str)
 str = str + "欢迎来到IECN.NET"
 myFuncB = str
End Function

msgbox myFuncA("张三","myFuncB")
</script>
二、利用GetRef：
<script type="text/vbscript">
Function myFuncA(str,myB)
 str = str & " 您好!"
 str = myB(str)
 myFuncA = str
End Function

Function myFuncB(str)
 str = str + "欢迎来到IECN.NET"
 myFuncB = str
End Function

document.write(myFuncA("张三",GetRef("myFuncB")))
</script>

最新评论