Eval 函数
计算一个表达式的值并返回结果。

[result = ]Eval(expression)
参数
result 
可选项。是一个变量，用于接受返回的结果。如果未指定结果，应考虑使用 Execute 语句代替。 
expression 
必选项。可以是包含任何有效 VBScript 表达式的字符串。 
说明
在 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
      If Eval("Guess = RndNum") Then
         MsgBox "祝贺你！猜对了！"
         Exit Sub
      Else
         Guess = CInt(InputBox("对不起，请再试一次",,0))
      End If
   Loop Until Guess = 0
End Sub
