



下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、杭州市電子信息職業(yè)學(xué)校課時(shí)授課計(jì)劃課題:條件判斷結(jié)構(gòu) 共2課時(shí)教學(xué)目標(biāo):1. 熟練掌握行IF語句的基本格式。2. 能熟練運(yùn)用行IF語句。1 復(fù)習(xí)給出程序如下:幫助學(xué)生回憶順序結(jié)構(gòu)的定義語句,賦值語句以及輸出語句,并點(diǎn)出順序語句的特點(diǎn)是依次執(zhí)行,從上至下。二引入之前學(xué)習(xí)的順序結(jié)構(gòu)是從第一行開始,自上而下的逐行運(yùn)行每條代碼,但是,程序語言編程一門技巧性特別強(qiáng)的專業(yè)技術(shù),具有其獨(dú)特的創(chuàng)作性和靈活性,如果從自始至終都是死板沒有變通,那么使得整個(gè)程序缺乏靈動(dòng)和活力。創(chuàng)設(shè)情境:現(xiàn)在專業(yè)課都是在實(shí)訓(xùn)樓上,如果所有人全部都死死等著坐電梯,那么可能有一半的同學(xué)會(huì)上課遲到。但是,如果上課的樓層較低的同學(xué)覺得坐電梯
2、人太多,會(huì)選擇爬樓梯。這就是人對(duì)實(shí)際狀況的一種判斷,如果始終一條道走到黑,肯定不是一個(gè)聰明人做的事情,其實(shí)VB編程也是一個(gè)道理。今天我們就來學(xué)習(xí)下VB中的判斷語句,順序、選擇、循環(huán)三大結(jié)構(gòu)中的選擇結(jié)構(gòu)。3 新課教學(xué)IF語句在VB中有三種叫法:選擇語句、分支語句、判斷語句格式:功能:當(dāng)條件表達(dá)式成立時(shí),執(zhí)行關(guān)鍵字THEN 后面的語句1,否則執(zhí)行關(guān)鍵字后面的語句2注意事項(xiàng):1<ELSE 語句2>是可選項(xiàng),需根據(jù)實(shí)際情況而定。2當(dāng)關(guān)鍵字THEN或ELSE后的語句不止一條時(shí),必須在語句之間使用冒號(hào)“:”。3條件表達(dá)式可以是任何運(yùn)算結(jié)果為邏輯型數(shù)據(jù)的關(guān)系表達(dá)式或邏輯表達(dá)式,當(dāng)值為True,則
3、條件成立,反之,當(dāng)表達(dá)式的值為False,則條件不成立。舉例:1 期中考試快到了,老爸答應(yīng),只要這次VB的成績能考到80分以上,就給我買一臺(tái)IPhone 4,要是在80分以下,就為我提供各種板栗。2. 請(qǐng)人吃飯,但是對(duì)方有個(gè)條件,消費(fèi)在10元以下的不考慮,10元以上的才去。Dim cost As Integercost = 11If cost > 10 Then Print "答應(yīng)和你去吃飯" Else Print "就不去了"一 區(qū)塊式IF語句IF語句的種類:IF語句根據(jù)格式的不同,有分為行IF語句和塊IF語句格式:功能:當(dāng)條件表達(dá)式成立時(shí),執(zhí)行
4、關(guān)鍵字THEN 后面的語句序列1,否則執(zhí)行關(guān)鍵字后面的語句序列2。無論執(zhí)行語句序列1還是執(zhí)行語句序列2,執(zhí)行完以后都要執(zhí)行END IF后面的語句。說明:1 條件表達(dá)式的要求及含義與行IF語句完全相同。2 語句序列1和語句序列2由一條多條語句組成。3 關(guān)鍵字ELSE及其后的語句序列2是可選項(xiàng),可有可無。4 關(guān)鍵字IFTHEN和關(guān)鍵字ELSE IF 必須成對(duì)使用,缺一不可。舉例:例1:上述例題1用區(qū)塊式IF語句可以改為:例2:根據(jù)我校學(xué)生到實(shí)訓(xùn)樓,乘坐電梯規(guī)則,按照所去樓層的高低,來選擇是否乘坐電梯,用塊IF語句來表示,寫成VB程序.ClsDim flow As Stringflow = Inpu
5、tBox("請(qǐng)輸入您要去的樓層!", "目的地對(duì)話框", 1)If flow < 6 ThenPrint "您的教室在低樓層,應(yīng)該走樓梯到達(dá)!"ElsePrint "您的教室在高樓層,請(qǐng)文明乘坐電梯!"End If二 學(xué)生練習(xí)1 從鍵盤任意輸入兩個(gè)數(shù),求其中的最小數(shù)。行IF語句:Private Sub Form_Activate()Dim a As Single, b As Single,a = InputBox("請(qǐng)輸入第一個(gè)變量的值")b = InputBox("請(qǐng)輸入第二個(gè)
6、變量的值")if a>b then print”最小數(shù)為:”;b else print “最小數(shù)為:”;aend sub 塊IF語句Private Sub Form_Activate()Dim a As Single, b As Singlea = InputBox("請(qǐng)輸入第一個(gè)變量的值")b = InputBox("請(qǐng)輸入第二個(gè)變量的值")if a>b then print”最小數(shù)為:”;belse print “最小數(shù)為:”;aend ifend sub 2 從鍵盤輸入三個(gè)數(shù),求其中的最大數(shù)和最小數(shù)Private Sub Fo
7、rm_Activate()Dim a As Single, b As Single, c As Single, mas As single, min as singlea = InputBox("請(qǐng)輸入第一個(gè)數(shù)")b = InputBox("請(qǐng)輸入第二個(gè)數(shù)")c = InputBox("請(qǐng)輸入第三個(gè)數(shù)")if a>b then max=a:min =b Else Max = b: min = aif max<b then max=bif min >b then min =bif max<c then max=c
8、if min >c then min =cprint “max=”;max,”min=”;minend sub3、從鍵盤輸入三個(gè)數(shù),將這三個(gè)數(shù),按照從小到大的順序,依次放入變量a,b,c三個(gè)變量中,并依次輸出這三個(gè)變量。Private Sub Form_Activate()Dim a As Integer, b As Integer, c As Integer, d As Integera = InputBox("請(qǐng)輸入第一個(gè)數(shù)", "輸入框")b = InputBox("請(qǐng)輸入第二個(gè)數(shù)", "輸入框")c = InputBox("請(qǐng)輸入第三個(gè)數(shù)", "輸入框")If a > b Then d = a:a = b:b = dIf
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 江蘇護(hù)理職業(yè)學(xué)院《匯編與接口技術(shù)》2023-2024學(xué)年第二學(xué)期期末試卷
- 塔里木大學(xué)《材料科學(xué)與工程專業(yè)導(dǎo)論》2023-2024學(xué)年第二學(xué)期期末試卷
- 江蘇省蘇州市昆山市、太倉市2025年初三5月熱身考試英語試題含答案
- 六盤水市重點(diǎn)中學(xué)2025年高三下學(xué)期摸底(期末)考試英語試題含解析
- 內(nèi)蒙古能源職業(yè)學(xué)院《學(xué)術(shù)與實(shí)務(wù)講座A》2023-2024學(xué)年第二學(xué)期期末試卷
- 遼寧省大連市第七十六中學(xué)2025屆初三第一次五校聯(lián)考自選模塊試卷含解析
- 鹽城工學(xué)院《古代文學(xué)Ⅱ(4)》2023-2024學(xué)年第一學(xué)期期末試卷
- 寧夏回族固原市原州區(qū)2025屆小升初數(shù)學(xué)重難點(diǎn)模擬卷含解析
- 順德市李兆基中學(xué)高三月月考英語試題
- 邯鄲市高二上學(xué)期期中考試化學(xué)試題
- 胸腔閉式引流護(hù)理-2023年中華護(hù)理學(xué)會(huì)團(tuán)體標(biāo)準(zhǔn)
- 2023年《移動(dòng)式壓力容器充裝質(zhì)量管理手冊(cè)》
- 第二屆全國物流設(shè)計(jì)大賽一等獎(jiǎng)作品:北京交通大學(xué)一隊(duì)全國決賽作品
- 全飛秒激光技術(shù)
- 水泥產(chǎn)品生產(chǎn)許可證實(shí)施細(xì)則
- ABB變頻器ACS510說明書
- 城軌道交通接觸網(wǎng)檢修工職業(yè)標(biāo)準(zhǔn)
- QC成果減少隧道工程Ⅳ類Ⅴ類圍巖超挖量
- LY/T 1763-2008沿海防護(hù)林體系工程建設(shè)技術(shù)規(guī)程
- 校園網(wǎng)站設(shè)計(jì)論文
- GB/T 17213.4-2015工業(yè)過程控制閥第4部分:檢驗(yàn)和例行試驗(yàn)
評(píng)論
0/150
提交評(píng)論