eval 函数
计算一个表达式的值并返回结果。
[result = ]eval(expression)
参数
result
可选项。 是一个变量，用于接受返回的结果。如果未指定结果，应考虑使用 execute 语句代替。
expression
必选项。可以是包含任何有效 vbscript 表达式的字符串。
说明
在 vbscript 中，x = y 可以有两种解释。第一种方式是赋值语句，将 y 的值赋予 x。第二种解释是测试 x 和 y 是否相等。如果相等，result 为 true；否则 result 为 false。eval 方法总是采用第二种解释，而 execute 语句总是采用第一种。
注意 在microsoft(r) visual basic scripting edition 中不存在这种比较与赋值的混淆，因为赋值运算符(=)与比较运算符 (==)不同。
下面的例子说明了 eval 函数的用法：
sub guessanumber
dim guess, rndnum
rndnum = int((100) * rnd(1) + 1)
guess = cint(inputbox("enter your guess:",,0))
do
if eval("guess = rndnum") then
msgbox "祝贺你！猜对了！"
exit sub
else
guess = cint(inputbox("对不起，请再试一次",,0))
end if
loop until guess = 0
end sub
