資源描述:
《第5課 vbscript編程語(yǔ)言(二)》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫(kù)。
1、第5課VBScript編程語(yǔ)言(二)本文由孫鑫770貢獻(xiàn)ppt文檔可能在WAP端瀏覽體驗(yàn)不佳。建議您優(yōu)先選擇TXT,或下載源文件到本機(jī)查看。第5課VBScript編程語(yǔ)言(二)VBScript編程語(yǔ)言(二)5.15.25.35.4課前導(dǎo)讀課堂教學(xué)上機(jī)練習(xí)課后作業(yè)5.1課前導(dǎo)讀VBScript雖然采用事件驅(qū)動(dòng),調(diào)用相對(duì)劃分得比較小的子過(guò)程,但是對(duì)于具體的過(guò)程本身,仍然要用到結(jié)構(gòu)化程序的方法,用控制結(jié)構(gòu)控制程序執(zhí)行的流程。有些簡(jiǎn)單程序可以只用單向流程來(lái)編寫,有些流程可以依靠運(yùn)算符的優(yōu)先級(jí)來(lái)控制,但為了處理復(fù)雜問(wèn)題,就要通過(guò)選擇和循環(huán)改變語(yǔ)句的執(zhí)行順序
2、。結(jié)構(gòu)化程序設(shè)計(jì)有三種基本結(jié)構(gòu):順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)。由這3種基本結(jié)構(gòu)還可以派生出“多分支結(jié)構(gòu)”,即根據(jù)條件從多個(gè)分支路徑中選擇執(zhí)行其中的一個(gè)。5.2課堂教學(xué)5.2.1VBScript的選擇結(jié)構(gòu)5.2.2VBScript的循環(huán)結(jié)構(gòu)5.2.3VBScript的過(guò)程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語(yǔ)句實(shí)現(xiàn)單條件選擇結(jié)構(gòu)最簡(jiǎn)單的語(yǔ)句是單行If語(yǔ)句,其語(yǔ)法格式為:If〈條件〉語(yǔ)句1Else〈語(yǔ)句2If〈條件〉Then〈語(yǔ)句1〉[El
3、se〈語(yǔ)句2〉說(shuō)明:①當(dāng)程序運(yùn)行到If語(yǔ)句時(shí),首先測(cè)試〈條件〉。如果條件為True,則執(zhí)行Then之后的語(yǔ)句。如果條件為False,并且有Else子句,則程序會(huì)執(zhí)行Else部分的語(yǔ)句2。而在執(zhí)行完Then或Else之后的語(yǔ)句后,會(huì)從EndIf之后的語(yǔ)句繼續(xù)執(zhí)行。②Else子句是可選的。③可以在〈語(yǔ)句1〉或〈語(yǔ)句2〉中使用冒號(hào)(:)將多個(gè)命令組合成一條語(yǔ)句?!纠?-1】下面的代碼測(cè)試輸入的數(shù)據(jù)是否有效的數(shù)值。下面的代碼測(cè)試輸入的數(shù)據(jù)是否有效的數(shù)值。簡(jiǎn)單驗(yàn)證請(qǐng)輸入數(shù)值數(shù)據(jù):請(qǐng)輸入數(shù)值數(shù)據(jù):name="Text1SIZE="1010">NAME="Bu
4、tton1VALUE="確認(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語(yǔ)句塊當(dāng)Then部分和Else部分包含較多內(nèi)容時(shí),必須用多個(gè)語(yǔ)句行來(lái)實(shí)現(xiàn)。If語(yǔ)句塊又稱為多行If語(yǔ)句,其語(yǔ)法結(jié)構(gòu)為:If〈條件1If〈條件1〉Then語(yǔ)句組1<語(yǔ)句組1>[Else語(yǔ)句組2[語(yǔ)句組2]]EndIf說(shuō)明:①當(dāng)程序運(yùn)行到If塊時(shí),首先測(cè)試〈條件〉。如果條件為T
5、rue,則執(zhí)行Then之后的語(yǔ)句。如果條件為False,并且有Else子句,則程序會(huì)執(zhí)行Else部分的語(yǔ)句組2。而在執(zhí)行完Then或Else之后的語(yǔ)句組后,會(huì)從EndIf之后的語(yǔ)句繼續(xù)執(zhí)行。②Else子句是可選的?!纠?-2】將例5-1中的行If語(yǔ)句改為使用If語(yǔ)句塊。簡(jiǎn)單驗(yàn)證請(qǐng)輸入數(shù)值數(shù)據(jù):請(qǐng)輸入數(shù)值數(shù)據(jù):name="Text1SIZE="1010">NAME="Button1VALUE="確認(rèn)確認(rèn)">FOR="Button1If語(yǔ)句的嵌套(3)If語(yǔ)句的嵌套If語(yǔ)句可以嵌套使用即在If語(yǔ)句的語(yǔ)句塊使用If語(yǔ)句。語(yǔ)句可以嵌套使用,If語(yǔ)句的語(yǔ)句
6、塊使用If語(yǔ)句If語(yǔ)句可以嵌套使用,即在If語(yǔ)句的語(yǔ)句塊使用If語(yǔ)句。鐵路托運(yùn)行李,從甲地到乙地,【例5-3】鐵路托運(yùn)行李,從甲地到乙地,規(guī)定每張客票托運(yùn)費(fèi)計(jì)算方法是:行李重量不超過(guò)50公斤時(shí),50公斤時(shí)托運(yùn)費(fèi)計(jì)算方法是:行李重量不超過(guò)50公斤時(shí),每公斤25元超過(guò)50公斤而不超過(guò)100公斤時(shí),50公斤而不超過(guò)100公斤時(shí)0.25元,超過(guò)50公斤而不超過(guò)100公斤時(shí),其超過(guò)部分每公斤035元超過(guò)100公斤時(shí),其超過(guò)部分每公斤045元100公斤時(shí)公斤0.35元,超過(guò)100公斤時(shí),其超過(guò)部分每公斤0.45元。編寫程序,輸入行李重量,計(jì)算并輸出托運(yùn)的費(fèi)用
7、。編寫程序,輸入行李重量,計(jì)算并輸出托運(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)計(jì)算托運(yùn)費(fèi)計(jì)算托運(yùn)費(fèi)計(jì)算請(qǐng)輸入行李重量:請(qǐng)輸入行李重量: kg VALUE="計(jì)算">執(zhí)行VBScr
8、ipt程序,瀏覽器顯示。(4)If語(yǔ)句的嵌套格式當(dāng)代碼中出現(xiàn)多層If語(yǔ)句嵌套時(shí),將使程序冗長(zhǎng)而不便閱讀。為此VBScript提供了帶El