计算一个表达式的值并返回结果。
[result = ]Eval(expression)
在 VBScript 中,x = y 可以有两种解释。第一种方式是赋值语句,将 y 的值赋予 x。第二种解释是测试 x 和 y 是否相等。如果相等,result 为 True;否则 result 为 False。Eval 方法总是采用第二种解释,而 Execute 语句总是采用第一种。
注意 在Microsoft® JScript™ 中不存在这种比较与赋值的混淆,因为赋值运算符 (=) 与比较运算符 (==) 不同。
下面的例子说明了 Eval 函数的用法:
Sub GuessANumber Dim Guess, RndNum RndNum = Int((100) * Rnd(1) + 1) Guess = CInt(InputBox("Enter your guess:",,0)) Do IfEval(
"Guess = RndNum")
Then MsgBox "祝贺你!猜对了!" Exit Sub Else Guess = CInt(InputBox("对不起,请再试一次",,0)) End If Loop Until Guess = 0 End Sub