VBS基础篇 - 条件语句(if与Select Case)
If...Then...Else
在下面的情况中，您可以使用If...Then...Else语句：
在条件为true时，执行某段代码
选择两段代码之一来执行时
dima'定义一个变量 a=100 ifa<200thena=300'若i<200,则对i重新赋值 msgboxa'输出的值为300
要运行多行代码，必须使用多行（或块）语法，多行（或块）语法包含EndIf语句
dima,b,c
a=inputbox("请输入a的值：")
b=100
c=200
ifa<200then'条件为True时运行某一语句块，条件为False时运行另一语句块
msgboxb
else
msgboxc
endif
对多个条件进行判断，可以添加任意多个ElseIf子句以提供多种选择
dima
a=inputbox("请输入a的值：")
ifa<200then'条件为True时运行某一语句块，条件为False时运行另一语句块
msgbox"执行语句1"
elseifa=200then
msgbox"执行语句2"
elseifa>200then
msgbox"执行语句3"
endif
SelectCase结构提供了If...Then...ElseIf结构的一个变通形式，可以从多个语句块中选择执行其中的一个。SelectCase语句提供的功能与If...Then...Else语句类似，但是可以使代码更加简练易读。
'SelectCase结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个Case的值比较，如果匹配，则执行与该Case关联的语句块。
dima
a=inputbox("随便填写一个数")
a=int(a)
selectcasea
case6,7,8,9msgbox("还行")
case10,11,12,13,14,15msgbox("一般")
case16,17,18,19,20msgbox("可以了")
case21,22,23,24,25msgbox("无敌了")
caseelsemsgbox("做梦呢")
endselect
注意：SelectCase结构只计算开始处的一个表达式（只计算一次），而If...Then...ElseIf结构计算每个ElseIf语句的表达式，这些表达式可以各不相同。仅当每个ElseIf语句计算的表达式都相同时，才可以使用SelectCase结构代替If...Then...ElseIf结构。