亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

VBS教程:函數(shù)-Eval 函數(shù)

 更新時(shí)間:2006年11月16日 00:00:00   作者:  

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è)試 xy 是否相等。如果相等,resultTrue;否則 resultFalse。Eval 方法總是采用第二種解釋,而 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

相關(guān)文章

最新評(píng)論