求助：那位老大详细解释一下eval的用法

[ssss123456]

解释一下eval的用法

[supere]

JScript:
描述
检查 JScript 代码并执行.
语法
eval(codestring)
codestring 参数是包含有效 JScript 代码的 String 对象. 这个字符串将由 JScript 分析器进行分析和执行.

说明
eval 函数允许 JScript 源代码的动态执行. 例如,下面的代码创建了一个包含 Date 对象的新变量 mydate :
eval("var mydate = new Date();");
传递给 eval 方法的代码执行时的上下文和调用 eval 方法的一样.

[supere]

VBScript:
描述
计算一个表达式的值并返回结果。
语法
[result = ]Eval(expression)
Eval 函数的语法中包含下面几部分：

部分 描述
result 可选项。 是一个变量，用于接受返回的结果。如果未指定结果，应考虑使用 Execute 语句代替。
expression 必选项。可以是包含任何有效 VBScript 表达式的字符串。


说明
在 VBScript 中，x = y 可以有两种解释。第一种方式是赋值语句，将 y 的值赋予 x。第二种解释是测试 x 和 y 是否相等。如果相等，result 为 True；否则 result 为 False。Eval 方法总是采用第二种解释，而 Execute 语句总是采用第一种。
注意 在Microsoft(R) 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