Eval 函數(shù)

計(jì)算一個(gè)表達(dá)式的值并返回結(jié)果。

 [result = ]Eval(expression)

參數(shù)

result

可選項(xiàng)。 是一個(gè)變量，用于接受返回的結(jié)果。如果未指定結(jié)果，應(yīng)考慮使用 Execute 語(yǔ)句代替。

expression

必選項(xiàng)?？梢允前魏斡行?VBScript 表達(dá)式的字符串。

說(shuō)明

在 VBScript 中，x = y 可以有兩種解釋。第一種方式是賦值語(yǔ)句，將 y 的值賦予 x。第二種解釋是測(cè)試 x 和 y 是否相等。如果相等，result 為 True；否則 result 為 False。Eval 方法總是采用第二種解釋?zhuān)?Execute 語(yǔ)句總是采用第一種。

注意  在Microsoft(R) Visual Basic Scripting Edition 中不存在這種比較與賦值的混淆，因?yàn)橘x值運(yùn)算符(=)與比較運(yùn)算符 (==)不同。

下面的例子說(shuō)明了 Eval 函數(shù)的用法：

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 "祝賀你！猜對(duì)了！"      Exit Sub    Else      Guess = CInt(InputBox("對(duì)不起，請(qǐng)?jiān)僭囈淮?CODE>",,0))    End If  Loop Until Guess = 0End Sub