VBS教程:VBscript語(yǔ)句-If...Then...Else 語(yǔ)句
If...Then...Else 語(yǔ)句
根據(jù)表達(dá)式的值有條件地執(zhí)行一組語(yǔ)句。
If condition Then statements [Else elsestatements ]
或者,使用塊形式的語(yǔ)法:
If condition Then
[statements]
[ElseIf condition-n Then
[elseifstatements]] . . .
[Else
[elsestatements]]
End If
參數(shù)
condition
一個(gè)或多個(gè)下面兩種類型的表達(dá)式:
數(shù)值或字符串表達(dá)式,其運(yùn)算結(jié)果是 True 或 False。如果 condition 是 Null,則 condition 被視為 False。
形如 TypeOf objectname Is objecttype 的表達(dá)式。objectname 是任何對(duì)象的引用,而 objecttype 則是任何有效的對(duì)象類型。如果 objectname 是 objecttype 所指定的一種對(duì)象類型,則表達(dá)式為 True;否則為 False。
Statements
如果 condition 為 True 時(shí),執(zhí)行的一條或多條(以冒號(hào)分開)語(yǔ)句。
condition-n
同 condition。
elseifstatements
如果相關(guān)的 condition-n 為 True時(shí),執(zhí)行的一條或多條語(yǔ)句。
elsestatements
如果前面沒(méi)有 condition 或 condition-n 表達(dá)式為 True 時(shí),執(zhí)行的一條或多條語(yǔ)句。
說(shuō)明
對(duì)于短小簡(jiǎn)單的測(cè)試,可以使用單行形式(第一種語(yǔ)法)。但塊形式(第二種語(yǔ)法)提供了比單行形式更強(qiáng)的結(jié)構(gòu)化與適應(yīng)性,比較容易閱讀、維護(hù)及調(diào)試。
注意 在單行語(yǔ)法中,可以執(zhí)行多條語(yǔ)句作為 If...Then 判斷的結(jié)果,但所有語(yǔ)句必須在同一行上并且以冒號(hào)分開,如下列語(yǔ)句所示:
If A > 10 Then A = A + 1 : B = B + A : C = C + B
當(dāng)程序運(yùn)行到 If 塊(第二種語(yǔ)法)時(shí),將測(cè)試 condition。如果 condition 是 True,則執(zhí)行 Then 之后的語(yǔ)句。如 condition 是 False,則每個(gè) ElseIf 部分的條件式(如果有的話)會(huì)依次計(jì)算并加以測(cè)試。當(dāng)找到某個(gè)為 True 的條件時(shí),則其相關(guān)的 Then 之后的語(yǔ)句會(huì)被執(zhí)行。如沒(méi)有一個(gè) ElseIf 語(yǔ)句是 True(或沒(méi)有 ElseIf 子句),則將執(zhí)行 Else 之后的語(yǔ)句。執(zhí)行 Then 或 Else 之后的語(yǔ)句以后,將繼續(xù)執(zhí)行 End If 之后的語(yǔ)句。
Else 和 ElseIf 子句都是可選項(xiàng)的。在 If 塊中可以放置任意多個(gè) ElseIf 子句,但是都必須在 Else 子句之前。If 塊語(yǔ)句可以被嵌套,即被包含在另一個(gè) If 塊語(yǔ)句之中。
要判斷某個(gè)語(yǔ)句是否是一個(gè) If 塊,可檢查 Then 關(guān)鍵字之后是什么。如果在 Then 的同一行之后還有其他非注釋的內(nèi)容,則此語(yǔ)句就是單行形式的 If 語(yǔ)句。
If 塊語(yǔ)句必須是某一行的第一條語(yǔ)句,并且必須以 End If 語(yǔ)句結(jié)束。
要在條件為 True 時(shí)運(yùn)行單行語(yǔ)句,可使用 If...Then...Else 語(yǔ)句的單行語(yǔ)法
下例示范了單行語(yǔ)法。請(qǐng)注意此例省略了關(guān)鍵字 Else
Dim myDate '定義一個(gè)變量
myDate = #2/13/95# '為變量賦值,時(shí)間:95-2-13
If myDate < Now Then myDate = Now '與當(dāng)前時(shí)間判斷大小,小則將當(dāng)前時(shí)間賦值MyDate
MsgBox myDate '輸出變量myDate的值,輸出為:95-2-13
要運(yùn)行多行代碼,必須使用多行(或塊)語(yǔ)法。多行(或塊)語(yǔ)法包含 End If 語(yǔ)句
下例示范了多行語(yǔ)法。如下所示:
Dim myDate '定義一個(gè)變量
myDate = #2/13/95# '為變量賦值,時(shí)間:95-2-13
If myDate < Now Then '與當(dāng)前時(shí)間判斷大小
myDate = Now‘小則將當(dāng)前時(shí)間賦值MyDate,并輸出重新賦值的myDate的值
MsgBox myDate '輸出為:95-2-13
End If
條件為 True 和 False 時(shí)分別運(yùn)行語(yǔ)句
可以使用 If...Then...Else 語(yǔ)句定義兩個(gè)可執(zhí)行語(yǔ)句塊:條件為 True 時(shí)運(yùn)行某一語(yǔ)句塊,條件為 False 時(shí)運(yùn)行另一語(yǔ)句塊。具體示例如下所示:
Dim myDate '定義一個(gè)變量
myDate = #2/13/2222# '為變量賦值,時(shí)間:2222-2-13
If myDate < Now Then '與當(dāng)前時(shí)間判斷大小
myDate = Now '小則將當(dāng)前時(shí)間賦值MyDate,并輸出重新賦值的myDate的值
MsgBox myDate
Else
MsgBox myDate '大則直接輸出myDate的值,輸出為:2222-2-13
End If
對(duì)多個(gè)條件進(jìn)行判斷
If...Then...Else 語(yǔ)句的一種變形允許您從多個(gè)條件中選擇,即添加 ElseIf 子句以擴(kuò)充 If...Then...Else 語(yǔ)句的功能,使您可以控制基于多種可能的程序流程。具體示例如下所示:
Dim value '定義一個(gè)變量
value = 10 '變量賦值為10
If value = 0 Then '判斷變量的值大小,如果相等則輸出變量值
MsgBox value
ElseIf value = 1 Then
MsgBox value
ElseIf value = 2 then
Msgbox value
Else
Msgbox "數(shù)值超出范圍!" '如過(guò)都不相等,則輸出”數(shù)值超出范圍!”
End If
可以添加任意多個(gè) ElseIf 子句以提供多種選擇。使用多個(gè) ElseIf 子句經(jīng)常會(huì)變得很累贅。在多個(gè)條件中進(jìn)行選擇的更好方法是使用 Select Case 語(yǔ)句。
欄 目:vb
下一篇:VBS教程:方法-AddFolders 方法(Folders)
本文標(biāo)題:VBS教程:VBscript語(yǔ)句-If...Then...Else 語(yǔ)句
本文地址:http://mengdiqiu.com.cn/a1/vb/8173.html
您可能感興趣的文章
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10VBS中的正則表達(dá)式的用法大全 <font color=red>原創(chuàng)&
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10VBScript教程 第十一課深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript語(yǔ)法速查及實(shí)例說(shuō)明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七課使用條件語(yǔ)句
- 01-10vbscript 可以按引用傳遞參數(shù)嗎?
- 01-10VBScript教程 第二課在HTML頁(yè)面中添加VBscript代碼


閱讀排行
- 1C語(yǔ)言 while語(yǔ)句的用法詳解
- 2java 實(shí)現(xiàn)簡(jiǎn)單圣誕樹的示例代碼(圣誕
- 3利用C語(yǔ)言實(shí)現(xiàn)“百馬百擔(dān)”問(wèn)題方法
- 4C語(yǔ)言中計(jì)算正弦的相關(guān)函數(shù)總結(jié)
- 5c語(yǔ)言計(jì)算三角形面積代碼
- 6什么是 WSH(腳本宿主)的詳細(xì)解釋
- 7C++ 中隨機(jī)函數(shù)random函數(shù)的使用方法
- 8正則表達(dá)式匹配各種特殊字符
- 9C語(yǔ)言十進(jìn)制轉(zhuǎn)二進(jìn)制代碼實(shí)例
- 10C語(yǔ)言查找數(shù)組里數(shù)字重復(fù)次數(shù)的方法
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語(yǔ)法速查及實(shí)例說(shuō)明
隨機(jī)閱讀
- 04-02jquery與jsp,用jquery
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 08-05DEDE織夢(mèng)data目錄下的sessions文件夾有什
- 01-11ajax實(shí)現(xiàn)頁(yè)面的局部加載
- 08-05dedecms(織夢(mèng))副欄目數(shù)量限制代碼修改
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 01-10C#中split用法實(shí)例總結(jié)
- 01-10使用C語(yǔ)言求解撲克牌的順子及n個(gè)骰子
- 01-10delphi制作wav文件的方法
- 08-05織夢(mèng)dedecms什么時(shí)候用欄目交叉功能?