濮阳杆衣贸易有限公司

主頁 > 知識庫 > VBS教程:VBscript語句-If...Then...Else 語句

VBS教程:VBscript語句-If...Then...Else 語句

熱門標簽:琿春電子地圖標注 地圖標注都什么意思 聯(lián)通能辦理400電話是多少錢 福建外呼系統(tǒng)購買 龍族幻想白銀異聞天使地圖標注 百度地圖標注的位置怎么更改 鴿森地圖標注 菏澤電銷機器人管理軟件 福建醫(yī)療智能外呼系統(tǒng)哪家好

If...Then...Else 語句

根據(jù)表達式的值有條件地執(zhí)行一組語句。

If condition Then statements [Else elsestatements ]

或者,使用塊形式的語法:

If condition Then
[statements]
[ElseIf condition-n Then
[elseifstatements]] . . .
[Else
[elsestatements]]
End If

參數(shù)
condition

一個或多個下面兩種類型的表達式:

數(shù)值或字符串表達式,其運算結(jié)果是 True 或 False。如果 condition 是 Null,則 condition 被視為 False。

形如 TypeOf objectname Is objecttype 的表達式。objectname 是任何對象的引用,而 objecttype 則是任何有效的對象類型。如果 objectname 是 objecttype 所指定的一種對象類型,則表達式為 True;否則為 False。

Statements

如果 condition 為 True 時,執(zhí)行的一條或多條(以冒號分開)語句。

condition-n

同 condition。

elseifstatements

如果相關(guān)的 condition-n 為 True時,執(zhí)行的一條或多條語句。

elsestatements

如果前面沒有 condition 或 condition-n 表達式為 True 時,執(zhí)行的一條或多條語句。

說明
對于短小簡單的測試,可以使用單行形式(第一種語法)。但塊形式(第二種語法)提供了比單行形式更強的結(jié)構(gòu)化與適應性,比較容易閱讀、維護及調(diào)試。

注意 在單行語法中,可以執(zhí)行多條語句作為 If...Then 判斷的結(jié)果,但所有語句必須在同一行上并且以冒號分開,如下列語句所示:

If A > 10 Then A = A + 1 : B = B + A : C = C + B
當程序運行到 If 塊(第二種語法)時,將測試 condition。如果 condition 是 True,則執(zhí)行 Then 之后的語句。如 condition 是 False,則每個 ElseIf 部分的條件式(如果有的話)會依次計算并加以測試。當找到某個為 True 的條件時,則其相關(guān)的 Then 之后的語句會被執(zhí)行。如沒有一個 ElseIf 語句是 True(或沒有 ElseIf 子句),則將執(zhí)行 Else 之后的語句。執(zhí)行 Then 或 Else 之后的語句以后,將繼續(xù)執(zhí)行 End If 之后的語句。

Else 和 ElseIf 子句都是可選項的。在 If 塊中可以放置任意多個 ElseIf 子句,但是都必須在 Else 子句之前。If 塊語句可以被嵌套,即被包含在另一個 If 塊語句之中。

要判斷某個語句是否是一個 If 塊,可檢查 Then 關(guān)鍵字之后是什么。如果在 Then 的同一行之后還有其他非注釋的內(nèi)容,則此語句就是單行形式的 If 語句。

If 塊語句必須是某一行的第一條語句,并且必須以 End If 語句結(jié)束。


要在條件為 True 時運行單行語句,可使用 If...Then...Else 語句的單行語法

下例示范了單行語法。請注意此例省略了關(guān)鍵字 Else

復制代碼 代碼如下:

Dim myDate '定義一個變量
myDate = #2/13/95# '為變量賦值,時間:95-2-13
If myDate Now Then myDate = Now '與當前時間判斷大小,小則將當前時間賦值MyDate
MsgBox myDate '輸出變量myDate的值,輸出為:95-2-13


要運行多行代碼,必須使用多行(或塊)語法。多行(或塊)語法包含 End If 語句

下例示范了多行語法。如下所示:

復制代碼 代碼如下:

Dim myDate '定義一個變量
myDate = #2/13/95# '為變量賦值,時間:95-2-13
If myDate Now Then '與當前時間判斷大小
myDate = Now‘小則將當前時間賦值MyDate,并輸出重新賦值的myDate的值
MsgBox myDate '輸出為:95-2-13
End If


條件為 True 和 False 時分別運行語句

可以使用 If...Then...Else 語句定義兩個可執(zhí)行語句塊:條件為 True 時運行某一語句塊,條件為 False 時運行另一語句塊。具體示例如下所示:

復制代碼 代碼如下:

Dim myDate '定義一個變量
myDate = #2/13/2222# '為變量賦值,時間:2222-2-13
If myDate Now Then '與當前時間判斷大小
myDate = Now '小則將當前時間賦值MyDate,并輸出重新賦值的myDate的值
MsgBox myDate
Else
MsgBox myDate '大則直接輸出myDate的值,輸出為:2222-2-13
End If


對多個條件進行判斷

If...Then...Else 語句的一種變形允許您從多個條件中選擇,即添加 ElseIf 子句以擴充 If...Then...Else 語句的功能,使您可以控制基于多種可能的程序流程。具體示例如下所示:

復制代碼 代碼如下:

Dim value '定義一個變量
value = 10 '變量賦值為10
If value = 0 Then '判斷變量的值大小,如果相等則輸出變量值
MsgBox value
ElseIf value = 1 Then
MsgBox value
ElseIf value = 2 then
Msgbox value
Else
Msgbox "數(shù)值超出范圍!" '如過都不相等,則輸出”數(shù)值超出范圍!”
End If


可以添加任意多個 ElseIf 子句以提供多種選擇。使用多個 ElseIf 子句經(jīng)常會變得很累贅。在多個條件中進行選擇的更好方法是使用 Select Case 語句。

標簽:鶴壁 達州 柳州 內(nèi)蒙古 南京 張掖 資質(zhì)掛靠 丹東

巨人網(wǎng)絡(luò)通訊聲明:本文標題《VBS教程:VBscript語句-If...Then...Else 語句》,本文關(guān)鍵詞  VBS,教程,VBscript,語句,-If...Then...Else,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《VBS教程:VBscript語句-If...Then...Else 語句》相關(guān)的同類信息!
  • 本頁收集關(guān)于VBS教程:VBscript語句-If...Then...Else 語句的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    永清县| 建昌县| 乐东| 饶平县| 沐川县| 六安市| 石门县| 公安县| 旌德县| 木兰县| 房山区| 手游| 菏泽市| 定襄县| 内江市| 湘西| 商丘市| 林芝县| 淮安市| 城固县| 隆化县| 安庆市| 湖州市| 洪泽县| 嘉荫县| 梨树县| 万安县| 凤凰县| 玉林市| 康定县| 什邡市| 临邑县| 肇源县| 神木县| 青岛市| 新晃| 清丰县| 广汉市| 汽车| 阿坝| 石家庄市|