• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • VBScript Eval 函數

    發表于:2007-06-21來源:作者:點擊數: 標簽:
    Eval 函數 計算一個表達式的值并返回結果。 [result = ] Eval( expression ) 參數 result 可選項。 是一個變量,用于接受返回的結果。如果未指定結果,應考慮使用 Execute 語句代替。 expression 必選項??梢允前魏斡行?VBScript 表達式的字符串。 說明

       

    Eval 函數

    計算一個表達式的值并返回結果。

     [result = ]Eval(expression)

    參數

    result

    可選項。 是一個變量,用于接受返回的結果。如果未指定結果,應考慮使用 Execute 語句代替。

    expression

    必選項??梢允前魏斡行?VBScript 表達式的字符串。

    說明

    在 VBScript 中,x = y 可以有兩種解釋。第一種方式是賦值語句,將 y 的值賦予 x。第二種解釋是測試 xy 是否相等。如果相等,resultTrue;否則 resultFalse。Eval 方法總是采用第二種解釋,而 Execute 語句總是采用第一種。

    注意  在Microsoft(R) Visual Basic Scripting Edition 中不存在這種比較與賦值的混淆,因為賦值運算符(=)與比較運算符 (==)不同。

    下面的例子說明了 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

    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>