灵活实用VBS入门教程应用篇
2019-10-26 17:57:43
供稿：网友
上一篇文章我们了解了VBS编程的一些基础知识，要更深入地学习还要学习选择结构和循环结构。
选择结构
选择结构，即是对条件进行判断，然后根据判断的结果，选择执行不同的分支的结构。常见的有IF条件语句和Select Case语句。
●IF条件语句
IF条件语句又有多种具体的形式，如If…Then、If…Then…Else、If…Then…ElseIf。下面分别用例程来说明。用笔记本编写一个如下内容的VBS脚本：
dim a,b
a=inputbox("输入第一个数字","输入")
b=inputbox("输入第二个数字","输入")
if a>b then
MsgBox("第一个数大于第二个数")
End if
运行后，要求用户输入两个数字，第一个数字的值赋给a，第二个数字的值赋给b，然后程序自动判断a和b，如果a的值大于b的值，就弹出信息提示框，显示“第一个数大于第二个数”。注意：then后面的语句不与then在同一行时，判断语句结束后要加一行End if来结束，否则程序会结束。如果是同一行的就不用再加上End if了，如上面的语句可改为：
dim a,b
a=inputbox("输入第一个数字","输入")
b=inputbox("输入第二个数字","输入")
if a>b then MsgBox("第一个数大于第二个数")
另外一个程序中可以用多个If语句，我们可以把上面的程序完善一下如下：
dim a,b
a=inputbox("输入第一个数字","输入")
b=inputbox("输入第二个数字","输入")
If a>b then
MsgBox("第一个数大于第二个数")
End if
If a=b then
MsgBox(“第一个数等于第二个数”)
End if
If a<b then
MsgBox(“第一个数小于第二个数”)
End if
我们也可以再换用IF的其它语句If…Then…Else和If…Then….Elseif来实现相同的作用，如下：
dim a,b
a=inputbox("输入第一个数字","输入")
b=inputbox("输入第二个数字","输入")
If a>b then
MsgBox("第一个数大于第二个数")
Else
IF a=b then
MsgBox(“第一个数等于第二个数”)
Else
MsgBox(“第一个数小于第二个数”)
End if
End if
――――――――――――――――――――――――――――――――――――――
dim a,b
a=inputbox("输入第一个数字","输入")
b=inputbox("输入第二个数字","输入")
If a>b then
MsgBox("第一个数大于第二个数")
Elseif a=b then
MsgBox(“第一个数等于第二个数”)
Else
