在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>

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/2580.html