文章摘要
这篇文章介绍了Visual Basic Scripting (VBS)语言中条件语句的使用方法。主要内容包括：
1. **If...Then...Else语句**：用于在条件为真时执行特定代码块，条件为假时执行另一代码块。例如：
```vbscript
dim a
a = inputbox("请输入a的值：")
if a < 200 then
msgbox "执行语句1"
else
msgbox "执行语句2"
end if
```
2. **多行条件语句**：使用多行（或块）语法，包含`End If`语句，支持嵌套条件判断。
3. **ElseIf语句**：用于处理多个条件判断。例如：
```vbscript
dim a
a = inputbox("请输入a的值：")
if a < 200 then
msgbox "执行语句1"
elseif a = 200 then
msgbox "执行语句2"
elseif a > 200 then
msgbox "执行语句3"
end if
```
4. **Select Case结构**：提供了一种更简洁易读的条件判断方式，类似于If...Then...ElseIf结构，但通过单个表达式计算结果。例如：
```vbscript
dim a
a = int(inputbox("随便填写一个数"))
select case a
case 6,7,8,9
msgbox("还行")
case 10,11,12,13,14,15
msgbox("一般")
case 16,17,18,19,20
msgbox("可以了")
case 21,22,23,24,25
msgbox("无敌了")
case else
msgbox("做梦呢")
end select
```
5. **注意事项**：Select Case结构仅计算开始处的一个表达式，而If...Then...ElseIf结构计算每个条件表达式。因此，当所有条件表达式结果相同时，才能使用Select Case结构。
这篇文章还建议读者参考相关的VBS教程以进一步掌握这些知识点。
……
在下面的情况中，您可以使用 If…Then…Else 语句：
在条件为 true 时，执行某段代码
选择两段代码之一来执行时
dim a ‘定义一个变量
a=100
if a < 200 then a=300 ‘若i<200,则对i重新赋值
msgbox a ‘输出的值为300
a=100
if a < 200 then a=300 ‘若i<200,则对i重新赋值
msgbox a ‘输出的值为300
要运行多行代码，必须使用多行（或块）语法，多行（或块）语法包含 End If 语句
dim a,b,c
a=inputbox(“请输入a的值：”)
b=100
c=200
if a<200 then ‘条件为 True 时运行某一语句块，条件为 False 时运行另一语句块
msgbox b
else
msgbox c
end if
a=inputbox(“请输入a的值：”)
b=100
c=200
if a<200 then ‘条件为 True 时运行某一语句块，条件为 False 时运行另一语句块
msgbox b
else
msgbox c
end if
对多个条件进行判断，可以添加任意多个 ElseIf 子句以提供多种选择
dim a
a=inputbox(“请输入a的值：”)
if a<200 then ‘条件为 True 时运行某一语句块，条件为 False 时运行另一语句块
msgbox “执行语句1”
elseif a=200 then
msgbox “执行语句2”
elseif a>200 then
msgbox “执行语句3”
end if
a=inputbox(“请输入a的值：”)
if a<200 then ‘条件为 True 时运行某一语句块，条件为 False 时运行另一语句块
msgbox “执行语句1”
elseif a=200 then
msgbox “执行语句2”
elseif a>200 then
msgbox “执行语句3”
end if
Select Case结构提供了 If…Then…ElseIf结构的一个变通形式，可以从多个语句块中选择执行其中的一个。Select Case语句提供的功能与 If…Then…Else语句类似，但是可以使代码更加简练易读。
‘Select Case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 Case 的值比较，如果匹配，则执行与该Case 关联的语句块。
dim a
a=inputbox(“随便填写一个数”)
a=int(a)
select case a
case 6,7,8,9 msgbox(“还行”)
case 10,11,12,13,14,15 msgbox(“一般”)
case 16,17,18,19,20 msgbox(“可以了”)
case 21,22,23,24,25 msgbox(“无敌了”)
case else msgbox(“做梦呢”)
end select
dim a
a=inputbox(“随便填写一个数”)
a=int(a)
select case a
case 6,7,8,9 msgbox(“还行”)
case 10,11,12,13,14,15 msgbox(“一般”)
case 16,17,18,19,20 msgbox(“可以了”)
case 21,22,23,24,25 msgbox(“无敌了”)
case else msgbox(“做梦呢”)
end select
注意： Select Case结构只计算开始处的一个表达式（只计算一次），而 If…Then…ElseIf 结构计算每个 ElseIf 语句的表达式，这些表达式可以各不相同。仅当每个 ElseIf 语句计算的表达式都相同时，才可以使用 Select Case 结构代替If…Then…ElseIf 结构。
您可能感兴趣的文章:VBS教程：VBScript 基础-使用条件语句VBScript教程 第七课使用条件语句
© 版权声明
文章版权归作者所有，未经允许请勿转载。
