靈活實用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
