从这节课开始，我们将要开始接触VBS中的流程控制语句了。
在所有的高级编程语言中，流程控制语句无非就两种- -条件语句和循环语句。
而所谓的条件语句，其实就是判断一个条件是否成立，如果成立，则执行什么命令，如果不成立，则执行什么命令。
所谓的循环语句，就是控制着一段命令执行多少遍，所以朋友们心里不要有压力，脚本这东西，蛮简单的，不必担心学不会。
那么，我这节课要说的，是VBS中的条件控制语句- -if…then…else
这个语句的格式为：
If 条件 then
要执行的命令
Else
要执行的命令
End if
下面我来说明一下这个语句。
这里需要我们给出一个条件来，然后脚本程序会判断这个条件是否成立，如果成立，则“then”，执行“then”后边的命令，如果条件不成立，则“else”，执行“else”后边的命令。
下面我来通过一个实例来说明这个语句的用法：
------------------------vbs_15.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript" for="button1" event="onclick">
dim a,b
'因为只有数值才可以比较大小
'而文本框中输入的内容都是以string类型保存的
'所以下面使用clng函数将string型转换为long型
'转换完毕后才可以进行比较
a=clng(form1.text1.value)
b=clng(form1.text2.value)
'转换完毕
if a=b then
form1.text3.value="两数相等"
else
form1.text3.value="两数不相等"
end if
</script>
</head>
<body>
<form name="form1">
请输入整数一：
<input type="text" name="text1">
<br>
请输入整数二：
<input type="text" name="text2">
<br>
其比较结果为：
<input type="text" name="text3">
<br>
<br>
<input type="button" name="button1" value="开始计算">
</form>
</body>
</html>
脚本执行效果如图：
随便输入两个整数，点击“开始计算”：
脚本运行成功。
其实，这个if…then…else还是可以省略最后的else的，请看下面的代码：
------------------------vbs_16.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript" for="button1" event="onclick">
dim a,b
a=clng(form1.text1.value)
b=clng(form1.text2.value)
if a=b then
form1.text3.value="两数相等"
end if
if a<>b then
form1.text3.value="两数不相等"
end if
</script>
</head>
<body>
<form name="form1">
请输入整数一：
<input type="text" name="text1">
<br>
请输入整数二：
<input type="text" name="text2">
<br>
其比较结果为：
<input type="text" name="text3">
<br>
<br>
<input type="button" name="button1" value="开始计算">
</form>
</body>
</html>
我只是把a与b比较的这一小段代码修改了一下，同样可以达到跟vbs_15.htm完全相同的效果，只是我这里没有用else语句，脚本运行效果如图：
另外，if…then…else语句还是可以嵌套的，嵌套格式为：
If 条件 then
命令
Elseif 条件 then
命令
…
Else
命令
End if
同样的，最后的那个else依旧是可以不要的。比如：
------------------------vbs_17.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript">
sub button1_onclick()
dim a
a=weekday(date)
if a=1 then
form1.text1.value="星期日"
elseif a=2 then
form1.text1.value="星期一"
elseif a=3 then
form1.text1.value="星期二"
elseif a=4 then
form1.text1.value="星期三"
elseif a=5 then
form1.text1.value="星期四"
elseif a=6 then
form1.text1.value="星期五"
elseif a=7 then
form1.text1.value="星期六"
end if
end sub
</script>
</head>
<body>
<form name="form1">
今天是：
<input type="text" name="text1">
<br>
<br>
<input type="button" name="button1" value="开始执行">
</form>
</body>
</html>
脚本执行效果为：
点击“开始执行”：
可见，脚本运行成功。
那么，关于条件语句中的if语句，我们就说这么多了，完毕。
在所有的高级编程语言中，流程控制语句无非就两种- -条件语句和循环语句。
而所谓的条件语句，其实就是判断一个条件是否成立，如果成立，则执行什么命令，如果不成立，则执行什么命令。
所谓的循环语句，就是控制着一段命令执行多少遍，所以朋友们心里不要有压力，脚本这东西，蛮简单的，不必担心学不会。
那么，我这节课要说的，是VBS中的条件控制语句- -if…then…else
这个语句的格式为：
If 条件 then
要执行的命令
Else
要执行的命令
End if
下面我来说明一下这个语句。
这里需要我们给出一个条件来，然后脚本程序会判断这个条件是否成立，如果成立，则“then”，执行“then”后边的命令，如果条件不成立，则“else”，执行“else”后边的命令。
下面我来通过一个实例来说明这个语句的用法：
------------------------vbs_15.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript" for="button1" event="onclick">
dim a,b
'因为只有数值才可以比较大小
'而文本框中输入的内容都是以string类型保存的
'所以下面使用clng函数将string型转换为long型
'转换完毕后才可以进行比较
a=clng(form1.text1.value)
b=clng(form1.text2.value)
'转换完毕
if a=b then
form1.text3.value="两数相等"
else
form1.text3.value="两数不相等"
end if
</script>
</head>
<body>
<form name="form1">
请输入整数一：
<input type="text" name="text1">
<br>
请输入整数二：
<input type="text" name="text2">
<br>
其比较结果为：
<input type="text" name="text3">
<br>
<br>
<input type="button" name="button1" value="开始计算">
</form>
</body>
</html>
脚本执行效果如图：
随便输入两个整数，点击“开始计算”：
脚本运行成功。
其实，这个if…then…else还是可以省略最后的else的，请看下面的代码：
------------------------vbs_16.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript" for="button1" event="onclick">
dim a,b
a=clng(form1.text1.value)
b=clng(form1.text2.value)
if a=b then
form1.text3.value="两数相等"
end if
if a<>b then
form1.text3.value="两数不相等"
end if
</script>
</head>
<body>
<form name="form1">
请输入整数一：
<input type="text" name="text1">
<br>
请输入整数二：
<input type="text" name="text2">
<br>
其比较结果为：
<input type="text" name="text3">
<br>
<br>
<input type="button" name="button1" value="开始计算">
</form>
</body>
</html>
我只是把a与b比较的这一小段代码修改了一下，同样可以达到跟vbs_15.htm完全相同的效果，只是我这里没有用else语句，脚本运行效果如图：
另外，if…then…else语句还是可以嵌套的，嵌套格式为：
If 条件 then
命令
Elseif 条件 then
命令
…
Else
命令
End if
同样的，最后的那个else依旧是可以不要的。比如：
------------------------vbs_17.htm------------------------
<html>
<head>
<title>VBS系列课程--if...then...else条件语句应用示例</title>
<script language="vbscript">
sub button1_onclick()
dim a
a=weekday(date)
if a=1 then
form1.text1.value="星期日"
elseif a=2 then
form1.text1.value="星期一"
elseif a=3 then
form1.text1.value="星期二"
elseif a=4 then
form1.text1.value="星期三"
elseif a=5 then
form1.text1.value="星期四"
elseif a=6 then
form1.text1.value="星期五"
elseif a=7 then
form1.text1.value="星期六"
end if
end sub
</script>
</head>
<body>
<form name="form1">
今天是：
<input type="text" name="text1">
<br>
<br>
<input type="button" name="button1" value="开始执行">
</form>
</body>
</html>
脚本执行效果为：
点击“开始执行”：
可见，脚本运行成功。
那么，关于条件语句中的if语句，我们就说这么多了，完毕。
