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 =0 End Sub
要求版本5 請(qǐng)參閱Execute 語(yǔ)句 返回首頁(yè)
|