第5課 vbscript編程語言(二)

《第5課 vbscript編程語言(二)》由會員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、第5課VBScript編程語言(二)本文由孫鑫770貢獻(xiàn)ppt文檔可能在WAP端瀏覽體驗不佳。建議您優(yōu)先選擇TXT，或下載源文件到本機(jī)查看。第5課VBScript編程語言（二）VBScript編程語言（二）5.15.25.35.4課前導(dǎo)讀課堂教學(xué)上機(jī)練習(xí)課后作業(yè)5.1課前導(dǎo)讀VBScript雖然采用事件驅(qū)動，調(diào)用相對劃分得比較小的子過程，但是對于具體的過程本身，仍然要用到結(jié)構(gòu)化程序的方法，用控制結(jié)構(gòu)控制程序執(zhí)行的流程。有些簡單程序可以只用單向流程來編寫，有些流程可以依靠運(yùn)算符的優(yōu)先級來控制，但為了處理復(fù)雜問題，就要通過選擇和循環(huán)

2、改變語句的執(zhí)行順序。結(jié)構(gòu)化程序設(shè)計有三種基本結(jié)構(gòu)：順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)。由這3種基本結(jié)構(gòu)還可以派生出“多分支結(jié)構(gòu)”，即根據(jù)條件從多個分支路徑中選擇執(zhí)行其中的一個。5.2課堂教學(xué)5.2.1VBScript的選擇結(jié)構(gòu)5.2.2VBScript的循環(huán)結(jié)構(gòu)5.2.3VBScript的過程5.2.1VBScript的選擇結(jié)構(gòu)1.單條件選擇結(jié)構(gòu)2.多分支條件選擇結(jié)構(gòu)1.單條件選擇結(jié)構(gòu)單條件選擇結(jié)構(gòu)是最常用的雙分支選擇結(jié)構(gòu)。(1)單行If語句實(shí)現(xiàn)單條件選擇結(jié)構(gòu)最簡單的語句是單行If語句，其語法格式為：If〈條件〉語句1Else〈語句2

3、If〈條件〉Then〈語句1〉[Else〈語句2〉說明：①當(dāng)程序運(yùn)行到If語句時，首先測試〈條件〉。如果條件為True，則執(zhí)行Then之后的語句。如果條件為False，并且有Else子句，則程序會執(zhí)行Else部分的語句2。而在執(zhí)行完Then或Else之后的語句后，會從EndIf之后的語句繼續(xù)執(zhí)行。②Else子句是可選的。③可以在〈語句1〉或〈語句2〉中使用冒號（:）將多個命令組合成一條語句。【例5-1】下面的代碼測試輸入的數(shù)據(jù)是否有效的數(shù)值。下面的代碼測試輸入的數(shù)據(jù)是否有效的數(shù)值。簡單驗證請輸入數(shù)值數(shù)據(jù)：請輸入數(shù)值數(shù)據(jù)：name

4、="Text1SIZE="1010">NAME="Button1VALUE="確認(rèn)確認(rèn)">FOR="Button1以5_1.htm或5_1.asp為文件名存盤，存放位置為默認(rèn)的主目錄c:inetpubwwwroot。打開瀏覽器，在地址欄中直接輸入：http://127.0.0.1/5_1.htm在瀏覽器上的顯示效果。(2)If語句塊當(dāng)Then部分和Else部分包含較多內(nèi)容時，必須用多個語句行來實(shí)現(xiàn)。If語句塊又稱為多行If語句，其語法結(jié)構(gòu)為：If〈條件1If〈條件1〉Then語句組1<語句組1>[Else語句組2[語句組2]

5、]EndIf說明：①當(dāng)程序運(yùn)行到If塊時，首先測試〈條件〉。如果條件為True，則執(zhí)行Then之后的語句。如果條件為False，并且有Else子句，則程序會執(zhí)行Else部分的語句組2。而在執(zhí)行完Then或Else之后的語句組后，會從EndIf之后的語句繼續(xù)執(zhí)行。②Else子句是可選的。【例5-2】將例5-1中的行If語句改為使用If語句塊。簡單驗證請輸入數(shù)值數(shù)據(jù)：請輸入數(shù)值數(shù)據(jù)：name="Text1SIZE="1010">NAME="Button1VALUE="確認(rèn)確認(rèn)">FOR="Button1If語句的嵌套(3)If語句的

6、嵌套If語句可以嵌套使用即在If語句的語句塊使用If語句。語句可以嵌套使用，If語句的語句塊使用If語句If語句可以嵌套使用，即在If語句的語句塊使用If語句。鐵路托運(yùn)行李，從甲地到乙地，【例5-3】鐵路托運(yùn)行李，從甲地到乙地，規(guī)定每張客票托運(yùn)費(fèi)計算方法是：行李重量不超過50公斤時，50公斤時托運(yùn)費(fèi)計算方法是：行李重量不超過50公斤時，每公斤25元超過50公斤而不超過100公斤時，50公斤而不超過100公斤時0.25元，超過50公斤而不超過100公斤時，其超過部分每公斤035元超過100公斤時，其超過部分每公斤045元100公斤

7、時公斤0.35元，超過100公斤時，其超過部分每公斤0.45元。編寫程序，輸入行李重量，計算并輸出托運(yùn)的費(fèi)用。編寫程序，輸入行李重量，計算并輸出托運(yùn)的費(fèi)用。分析：設(shè)行李重量為w公斤，應(yīng)付運(yùn)費(fèi)為x分析：設(shè)行李重量為w公斤，應(yīng)付運(yùn)費(fèi)為x元，則運(yùn)費(fèi)公式為：則運(yùn)費(fèi)公式為：(w≤50)?0.25×w?x=?0.25×50+0.35×(w?50)(50100)?編寫如下VBScript程序代碼：編寫如下VBScript程序代碼：VBScript程序代碼托運(yùn)費(fèi)計算托

8、運(yùn)費(fèi)計算托運(yùn)費(fèi)計算請輸入行李重量：請輸入行李重量： kg  VALUE="計算">執(zhí)行VBScript程序，瀏覽器顯示。(4)If語句的嵌套格式當(dāng)代碼中出現(xiàn)多層If語句嵌套時，將使程序冗長而不便閱讀。為此VBScript提供了帶El