六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

使用條件語句

[摘要]控制程序執行 使用條件語句和循環語句可以控制 Script 的流程。使用條件語句可以編寫進行判斷和重復操作的 VBScript 代碼。在 VBScript 中可使用以下條件語句: If...Then...Else 語句 Select Case 語句 使用 If...Then...Else 進行判斷...

控制程序執行
使用條件語句和循環語句可以控制 Script 的流程。使用條件語句可以編寫進行判斷和重復操作的 VBScript 代碼。在 VBScript 中可使用以下條件語句:

If...Then...Else 語句
Select Case 語句
使用 If...Then...Else 進行判斷
If...Then...Else 語句用于計算條件是否為 True 或 False,并且根據計算結果指定要運行的語句。通常,條件是使用比較運算符對值或變量進行比較的表達式。有關比較運算符的詳細信息,請參閱比較運算符。If...Then...Else 語句可以按照需要進行嵌套。

條件為 True 時運行語句
要在條件為 True 時運行單行語句,可使用 If...Then...Else 語句的單行語法。下例示范了單行語法。請注意此例省略了關鍵字 Else。

Sub FixDate()
Dim myDate
myDate = #2/13/95#
If myDate < Now Then myDate = Now
End Sub

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

Sub AlertUser(value)
If value = 0 Then
AlertLabel.ForeColor = vbRed
AlertLabel.Font.Bold = True
AlertLabel.Font.Italic = True
End If
End Sub

條件為 True 和 False 時分別運行某些語句
可以使用 If...Then...Else 語句定義兩個可執行語句塊:條件為 True 時運行某一語句塊,條件為 False 時運行另一語句塊。

Sub AlertUser(value)
If value = 0 Then
AlertLabel.ForeColor = vbRed
AlertLabel.Font.Bold = True
AlertLabel.Font.Italic = True
Else
AlertLabel.Forecolor = vbBlack
AlertLabel.Font.Bold = False
AlertLabel.Font.Italic = False
End If
End Sub

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

Sub ReportValue(value)
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 語句。

使用 Select Case 進行判斷
Select Case 結構提供了 If...Then...ElseIf 結構的一個變通形式,可以從多個語句塊中選擇執行其中的一個。Select Case 語句提供的功能與 If...Then...Else 語句類似,但是可以使代碼更加簡練易讀。

Select Case 結構在其開始處使用一個只計算一次的簡單測試表達式。表達式的結果將與結構中每個 Case 的值比較。如果匹配,則執行與該 Case 關聯的語句塊:

Select Case Document.Form1.CardType.Options(SelectedIndex).Text
Case "MasterCard"
DisplayMCLogo
ValidateMCAccount
Case "Visa"
DisplayVisaLogo
ValidateVisaAccount
Case "American Express"
DisplayAMEXCOLogo
ValidateAMEXCOAccount
Case Else
DisplayUnknownImage
PromptAgain
End Select

請注意 Select Case 結構只計算開始處的一個表達式(只計算一次),而 If...Then...ElseIf 結構計算每個 ElseIf 語句的表達式,這些表達式可以各不相同。僅當每個 ElseIf 語句計算的表達式都相同時,才可以使用 Select Case 結構代替 If...Then...ElseIf 結構。
(出處:熱點網絡)


主站蜘蛛池模板: 特级片在线观看 | 天天色爱| 日韩中文字幕久久精品 | 亚洲成a人片在线观看中文 亚洲成a人片在线观看精品 | 三级在线观看免播放网站 | 自拍亚洲 | 一级一级 a爱片免费视频 | 日日摸日日添日日透 | 午夜视频在线网站 | 日韩在线观看视频免费 | 香蕉视频你懂的 | 欧美又大又粗又长又硬 | 日本欧美午夜 | 青青视频网站 | 四虎影院色 | 在线视频一区二区三区 | 欧美亚洲免费久久久 | 欧美性野久久久久久久久 | 天堂bt | 欧美性xxxx交 | 天天天狠天天透天天制色 | 日韩黄色在线观看 | 日韩不卡视频在线 | 日本剧情片大全免费的视频 | 一级毛片免费毛片一级毛片免费 | 亚洲一区在线免费 | 午夜精品久久久久久久99热下载 | 日韩精品一区二区三区毛片 | 亚洲一二三四区 | 婷婷亚洲天堂 | 视频一区日韩 | 最近最新中文字幕1页 | 天天射天天做 | 亚洲五月六月丁香激情 | 日日夜夜综合 | 欧美视频在线观看网站 | 青草悠悠视频在线观看 | 特级做a爰片毛片免费看一区 | 依人在线 | 天堂bt资源新版在线 | 青草免费视频 |