亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > VBScript > 正文

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

2020-07-26 12:11:07
字體:
來源:轉載
供稿:網友

If...Then...Else 語句

根據表達式的值有條件地執行一組語句。

If condition Then statements [Else elsestatements ]

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

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

參數
condition

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

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

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

Statements

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

condition-n

同 condition。

elseifstatements

如果相關的 condition-n 為 True時,執行的一條或多條語句。

elsestatements

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

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

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

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

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

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

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


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

下例示范了單行語法。請注意此例省略了關鍵字 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 語句定義兩個可執行語句塊:條件為 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 "數值超出范圍!" '如過都不相等,則輸出”數值超出范圍!”
End If


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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
日韩视频免费在线观看| 国产精品成人va在线观看| 中文字幕日韩av综合精品| 欧美裸体xxxx| 亚洲欧美日韩区| 日本久久久久久久久久久| 狠狠躁夜夜躁人人爽超碰91| 亚洲夜晚福利在线观看| 亚洲欧美中文日韩在线v日本| 秋霞av国产精品一区| 亚洲免费精彩视频| 国产欧美一区二区三区在线| 日韩欧美主播在线| 97福利一区二区| 国产精品激情av在线播放| 欧美猛交ⅹxxx乱大交视频| 都市激情亚洲色图| 一本色道久久88综合日韩精品| 狠狠色狠色综合曰曰| 欧美一区在线直播| 国产精品欧美日韩久久| 久久九九精品99国产精品| 亚洲视频第一页| 亚洲xxxx3d| 国产精品一区二区三区久久| 91在线视频精品| 欧美综合在线观看| 国产91精品黑色丝袜高跟鞋| 日日狠狠久久偷偷四色综合免费| 亚洲国产91精品在线观看| 欧美日韩视频在线| 亚洲精品电影网在线观看| 久热在线中文字幕色999舞| 欧美日韩xxxxx| 九九久久综合网站| 国模极品一区二区三区| 国产精品稀缺呦系列在线| 亚洲欧美自拍一区| 成人美女免费网站视频| 亚洲综合成人婷婷小说| 亚洲欧美日韩一区二区三区在线| 亚洲少妇激情视频| 92看片淫黄大片看国产片| 成人国产精品免费视频| 色综合久久久久久中文网| 日韩在线精品视频| 国产精品久久久999| 久久精品99久久久香蕉| 少妇精69xxtheporn| 国产精品成人国产乱一区| 一区二区三区视频免费在线观看| 久久久精品亚洲| 久久久爽爽爽美女图片| 久久久99免费视频| 欧美性理论片在线观看片免费| 黑人精品xxx一区| 亚洲国产精久久久久久久| 狠狠躁夜夜躁人人爽超碰91| 欧美黄色免费网站| 成人疯狂猛交xxx| 亚洲图片欧洲图片av| 日韩在线播放视频| 亚洲精品免费在线视频| 成人激情在线播放| 午夜精品久久久久久久99黑人| 国产亚洲精品成人av久久ww| 欧美激情中文字幕乱码免费| 亚洲最新中文字幕| 91欧美精品成人综合在线观看| 久久好看免费视频| 日韩美女视频免费在线观看| 欧美久久精品午夜青青大伊人| 日韩电影免费观看在线观看| 欧美激情综合色综合啪啪五月| 九九九热精品免费视频观看网站| 97久久久免费福利网址| 国产成人a亚洲精品| 91精品国产一区| 亚洲精品久久7777777| 久久久久久国产免费| 亚洲乱码一区av黑人高潮| 亚洲国产精久久久久久| 国产精品久久久久久久久久久久久| 日韩欧美国产一区二区| 日韩精品视频在线播放| 欧美性高潮在线| 久久综合网hezyo| 欧美激情综合色综合啪啪五月| 日韩精品在线免费观看视频| 97超碰色婷婷| 国产精品久久激情| 精品久久久久久中文字幕大豆网| 亚洲午夜小视频| 成人网页在线免费观看| 成人乱色短篇合集| www.国产精品一二区| 国产精品观看在线亚洲人成网| 国产精品亚洲精品| 国产视频精品在线| 亚洲人成亚洲人成在线观看| 欧美视频一二三| 91成人在线视频| 久久97精品久久久久久久不卡| 日韩资源在线观看| 亚洲男人第一av网站| 国产免费久久av| 3344国产精品免费看| 亚洲娇小xxxx欧美娇小| 国产69久久精品成人| 日韩高清欧美高清| 国产亚洲视频在线观看| 色偷偷偷亚洲综合网另类| 在线观看视频亚洲| 国产精品成人免费视频| 久久韩国免费视频| 成人在线中文字幕| 91色精品视频在线| 欧美性猛交xxxxx水多| 久久久国产一区二区三区| 亚洲日韩欧美视频| 中文字幕国产精品久久| 米奇精品一区二区三区在线观看| 91国产视频在线播放| 日韩二区三区在线| 免费97视频在线精品国自产拍| 国产精品一区二区电影| 国产精品私拍pans大尺度在线| 国产日产欧美精品| 国产精品久久久久久久久久免费| 国产精品99蜜臀久久不卡二区| 亚洲国产99精品国自产| 在线丨暗呦小u女国产精品| 日韩精品在线免费| 久久中国妇女中文字幕| 亚洲人午夜精品免费| 国产在线观看不卡| 欧美电影在线观看| 青青久久aⅴ北条麻妃| 九九九久久国产免费| 欧美精品18videos性欧美| 日韩激情av在线免费观看| 精品久久久av| 国模精品视频一区二区三区| 在线日韩精品视频| 夜夜躁日日躁狠狠久久88av| 国产精品视频不卡| 日韩一二三在线视频播| 欧美视频免费在线观看| 国产精品美乳一区二区免费| 欧美国产日韩一区二区| 久久久国产精品一区| www日韩中文字幕在线看| 2019亚洲日韩新视频| 欧美激情欧美狂野欧美精品| 亚洲精品短视频| 久久久久999| 欧美日韩裸体免费视频| 欧美一区二区色| 欧美大全免费观看电视剧大泉洋| 亚洲人成网站免费播放| 午夜精品一区二区三区在线| 成人黄色在线观看| 91精品国产亚洲| 欧美专区在线观看|