高中信息技術(shù)-vb循環(huán)結(jié)構(gòu)-滬教版選修1省名師優(yōu)質(zhì)課賽課獲獎(jiǎng)?wù)n件市賽課一等獎(jiǎng)?wù)n件

VB循環(huán)結(jié)構(gòu)程序設(shè)計(jì)VB循環(huán)結(jié)構(gòu)程序設(shè)計(jì)1/14[復(fù)習(xí)引入]：同學(xué)們想一想：現(xiàn)在我們會(huì)考、高考都使用答題卡，然后由計(jì)算機(jī)閱卷，那么計(jì)算機(jī)是怎樣閱卷，怎樣進(jìn)行這項(xiàng)重復(fù)工作呢？2/14例1：編寫(xiě)一個(gè)程序：打印5行豎排“*”。PrivateSubform_click()

Print“*”

Print“*”

Print“*”

Print“*”

Print“*”EndSub☆假如是打印10行，100行甚至更多，那應(yīng)該怎樣實(shí)現(xiàn)？3/14循環(huán)結(jié)構(gòu)也稱重復(fù)結(jié)構(gòu)，它作用是使一段程序能重復(fù)執(zhí)行，被重復(fù)執(zhí)行部分稱為循環(huán)體。但重復(fù)普通都是有條件，即在滿足FOR語(yǔ)句中條件下才執(zhí)行循環(huán)體，不然退出循環(huán)體。循環(huán)結(jié)構(gòu)：4/14For循環(huán)控制變量=初值To終值[Step循環(huán)變量增量（步長(zhǎng))]循環(huán)體語(yǔ)句塊（循環(huán)體）Next[循環(huán)控制變量]For/next循環(huán)語(yǔ)句：循環(huán)變量←初值語(yǔ)句序列循環(huán)變量←循環(huán)變量+步長(zhǎng)循環(huán)變量超過(guò)終值嗎？NY5/141）循環(huán)控制變量必須為整型；2）當(dāng)步長(zhǎng)（循環(huán)變量增量）為1時(shí)，STEP1可省略不寫(xiě)；3）語(yǔ)句序列（循環(huán)體）中能夠含有任意多條語(yǔ)句，也可無(wú)任何語(yǔ)句，稱為空循環(huán)；4）語(yǔ)句序列中能夠含有循環(huán)結(jié)構(gòu)；5）FOR語(yǔ)句與NEXT語(yǔ)句必須成對(duì)出現(xiàn)，缺一不可。6）FOR語(yǔ)句與NEXT語(yǔ)句循環(huán)變量是同一變量。7）有時(shí)需中途退出循環(huán)，這時(shí)用EXIT

FOR命令。說(shuō)明：6/141、上例1用循環(huán)語(yǔ)句實(shí)現(xiàn)：編程打印5行豎排“*”。PrivateSubform_click()ForI=1TO5Step1Print“*”NextIEndSubI=1Prnit“*”I=I+1I>=5NY☆FOR語(yǔ)句稱為“循環(huán)起始語(yǔ)句”，它作用是確定循環(huán)變量值怎樣改變，從而控制循環(huán)次數(shù)；I是循環(huán)變量，它值在執(zhí)行過(guò)程中是改變，它初值為1，終值為5，循環(huán)增量（步長(zhǎng)）為1。應(yīng)用：7/141）假如把程序中step1改成step-1,應(yīng)該怎樣修改程序。2）假如程序中缺乏s=1，最終s值是多少？

3）假如計(jì)算1×2×3×…×N，應(yīng)該怎樣修改程序。4)假如計(jì)算2×4×6×8×…×1000，應(yīng)該怎樣修改程序。閱讀計(jì)算1×2×3×4×5程序，回答以下問(wèn)題，并上機(jī)驗(yàn)證：DimiAsIntergerDimsAsIntergerS=1Fori=1To5step1s=s*INexti2、同學(xué)們分成四組討論下題，然后每組完成一小題，深入了解For/next語(yǔ)句格式。8/143、請(qǐng)同學(xué)們閱讀下面程序，寫(xiě)出結(jié)果并上機(jī)驗(yàn)證，畫(huà)出流程圖，說(shuō)明程序功效。fori=1to3step1printinextiend第幾次循環(huán)循環(huán)開(kāi)始時(shí)i值執(zhí)行NEXT之后i值i與終值比較執(zhí)行下一次循環(huán)否？123123234<3=3>3執(zhí)行執(zhí)行停頓執(zhí)行I=1Prnit

iI=I+1I>=3NY[程序執(zhí)行過(guò)程分析]9/14PrivateSubform_click()s=0forx=1to100s=s+xnextxprintsEndSub功效：求1到100和PrivateSubform_click()fori=20to10step–2printinextiEndSub功效：輸入20、28、16、14、12、10六個(gè)數(shù)4、閱讀下面程序，深化對(duì)程序了解。10/145、練習(xí)：1）依次在屏幕上打印2、4、6、…、20平方。2）求1+1/2+1/3+1/4+…+1/10值。11/141、For循環(huán)控制變量=初值To終值[Step循環(huán)變量增量（步長(zhǎng))]循環(huán)體語(yǔ)句塊（循環(huán)體）

Next[循環(huán)控制變量]2、處理問(wèn)題思緒和方法（算法）→制作流程圖→編寫(xiě)VB代碼3、循環(huán)變量值“超出”終值時(shí)才終止循環(huán)過(guò)程?？偨Y(jié)：12/14