189 8069 5689
本篇内容介绍了“VBS条件语句的用法”的有关知识，在实际案例的操作过程中，不少人都会遇到这样的困境，接下来就让小编带领大家学习一下如何处理这些情况吧！希望大家仔细阅读，能够学有所成！
使用条件语句和循环语句可以控制脚本的流程。使用条件语句可以编写进行判断和重复操作的 VBScript 代码。在 VBScript 中可使用以下条件语句：
If...Then...Else 语句
Select Case 语句
If...Then...Else 语句用于计算条件是否为True 或False，并且根据计算结果指定要运行的语句。通常，条件是使用比较运算符对值或变量进行比较的表达式。有关比较运算符的详细信息，请参阅比较运算符。If...Then...Else 语句可以按照需要进行嵌套。
要在条件为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
可以使用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 结构提供了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 PromptAgainEnd Select
请注意Select Case 结构只计算开始处的一个表达式（只计算一次），而If...Then...ElseIf 结构计算每个ElseIf 语句的表达式，这些表达式可以各不相同。仅当每个ElseIf 语句计算的表达式都相同时，才可以使用Select Case结构代替If...Then...ElseIf 结构。
undefined
“VBS条件语句的用法”的内容就介绍到这里了，感谢大家的阅读。如果想了解更多行业相关的知识可以关注创新互联网站，小编将为大家输出更多高质量的实用文章！