VB公開課電子PPT演示課件

1、11 1、假設、假設a=6a=6，執(zhí)行語句，執(zhí)行語句x=iif(a5x=iif(a5，-1-1，0)0)后，后，x x的值為（的值為（ ）課前回顧課前回顧a.5 b.6 c.0 d.-1a.5 b.6 c.0 d.-1d.-1d.-12 2、設、設x=3.4x=3.4，執(zhí)行語句，執(zhí)行語句x=iif(xint(x)x=iif(x2 then if a2 then x=“a” x=“a” elseif a3 then elseif a3 then x=“b” x=“b” elseif a4 then elseif a4 then x=“c” x=“c” elseif a5 then elseif

2、a5 then x=“d” x=“d” end if end if label1.caption=x label1.caption=x end sub end sub 單擊窗體后，標簽中單擊窗體后，標簽中顯示的結果是（顯示的結果是（ ）a.a b.b c.c d.da.a b.b c.c d.da.aa.a3課前回顧課前回顧4 4、private sub command1_clickprivate sub command1_click n=val(text1.text) n=val(text1.text) select case n select case n case 1 to 20 cas

3、e 1 to 20 x=10 x=10 case 2,4,6,11 case 2,4,6,11 x=20 x=20 case is10 case is5 then x=x+1if x5 then x=x+1a.0 b.8 c.6 d.a.0 b.8 c.6 d.程序出錯程序出錯b.8b.85第五章第五章 循環(huán)結構程序設計循環(huán)結構程序設計6一、循環(huán)結構的基本概念一、循環(huán)結構的基本概念二、二、do.loopdo.loop語句語句三、三、for.nextfor.next語句語句四、四、while.wendwhile.wend循環(huán)結構循環(huán)結構五、列表框和組合框五、列表框和組合框六、常用算法介紹六、常用

4、算法介紹本章內容本章內容一、掌握三種循環(huán)結構的語法格式及運用；一、掌握三種循環(huán)結構的語法格式及運用；二、掌握兩種控件的常用屬性、方法和事件；二、掌握兩種控件的常用屬性、方法和事件；三、掌握多項累加和累乘的算法三、掌握多項累加和累乘的算法學習重點學習重點7 循環(huán)結構由兩部分組成：循環(huán)結構由兩部分組成： （1 1）循環(huán)體循環(huán)體：反復執(zhí)行的處理步驟：反復執(zhí)行的處理步驟 （2 2）循環(huán)控制部分循環(huán)控制部分：指定循環(huán)條件來：指定循環(huán)條件來控制重復次數(shù)的語句。正常情況下，循環(huán)控制重復次數(shù)的語句。正常情況下，循環(huán)次數(shù)必須是有限的。次數(shù)必須是有限的。 在一些算法中，從某處開始，按照一在一些算法中，從某處開始，

5、按照一定條件，反復執(zhí)行某一處理步驟的情況，定條件，反復執(zhí)行某一處理步驟的情況，這就是這就是循環(huán)結構循環(huán)結構。一、循環(huán)結構的基本概一、循環(huán)結構的基本概念念8一、循環(huán)結構的基本概一、循環(huán)結構的基本概念念 true 循環(huán)條件 循環(huán)體 false vbvb提供的循環(huán)控制提供的循環(huán)控制語句有以下四種：語句有以下四種：1.do.loop1.do.loop2.for.next2.for.next3.while.wend3.while.wend4.for each.next4.for each.next2.for.next2.for.next1.do.loop1.do.loop9后測型后測型do.loop循環(huán)

6、循環(huán)前測型前測型do.loop循環(huán)循環(huán)滿足條件？滿足條件？循環(huán)體循環(huán)體是是否否循環(huán)體循環(huán)體是是否否滿足條件？滿足條件？先判斷先判斷 后執(zhí)行后執(zhí)行先執(zhí)行先執(zhí)行 后判斷后判斷先判斷指定的條件是否為成立，若條先判斷指定的條件是否為成立，若條件件成立，成立，執(zhí)行循環(huán)條件，條件不成立執(zhí)行循環(huán)條件，條件不成立時退出循環(huán)。時退出循環(huán)。先執(zhí)行循環(huán)體，然后再檢查條件是否先執(zhí)行循環(huán)體，然后再檢查條件是否成立，如果成立，如果不成立不成立就重復執(zhí)行循環(huán)體，就重復執(zhí)行循環(huán)體，直到條件成立退出循環(huán)。直到條件成立退出循環(huán)。二、二、do.loopdo.loop語句語句10do while exit doloop（1 1）前測

7、型循環(huán)）前測型循環(huán)循環(huán)體循環(huán)體滿足條件？滿足條件？是是否否二、二、do.loopdo.loop語句語句do until exit doloop當型前測型當型前測型直到前測型直到前測型11說明：說明：1.1.前測型循環(huán)是先判斷條件，根據條件成立前測型循環(huán)是先判斷條件，根據條件成立與否決定是否執(zhí)行循環(huán)體，這種情況下，與否決定是否執(zhí)行循環(huán)體，這種情況下，循循環(huán)體有可能一次都不被執(zhí)行環(huán)體有可能一次都不被執(zhí)行。2.2.當當vbvb執(zhí)行執(zhí)行do while.loopdo while.loop循環(huán)時，若條循環(huán)時，若條件為件為truetrue，執(zhí)行循環(huán)體，條件為，執(zhí)行循環(huán)體，條件為falsefalse時退時退

8、出循環(huán)；當出循環(huán)；當vbvb執(zhí)行執(zhí)行do until.loopdo until.loop循環(huán)時，循環(huán)時，若條件為若條件為falsefalse，執(zhí)行循環(huán)體，條件為，執(zhí)行循環(huán)體，條件為truetrue時退出循環(huán)。時退出循環(huán)。3.3.在語句列中的任何位置都可放置在語句列中的任何位置都可放置exit doexit do語句，執(zhí)行語句，執(zhí)行exit doexit do語句時，就會語句時，就會退出循環(huán)退出循環(huán)。二、二、do.loopdo.loop語句語句12執(zhí)行過程：執(zhí)行過程：1.1.先把先把初值初值賦給循環(huán)變量；賦給循環(huán)變量；2.2.再再判斷條件判斷條件，若符合條件，則執(zhí)行循環(huán)體，若符合條件，則執(zhí)行循環(huán)

9、體內語句，否則跳出循環(huán)執(zhí)行內語句，否則跳出循環(huán)執(zhí)行l(wèi)ooploop后語句；后語句；3.3.執(zhí)行循環(huán)體時，若出現(xiàn)執(zhí)行循環(huán)體時，若出現(xiàn)exit doexit do語句，則語句，則無條件無條件跳出循環(huán)跳出循環(huán)，執(zhí)行，執(zhí)行l(wèi)ooploop后語句；后語句；4.4.要注意防止死循環(huán)的情況出現(xiàn)，若出現(xiàn)死要注意防止死循環(huán)的情況出現(xiàn)，若出現(xiàn)死循環(huán)，可按循環(huán)，可按ctrl+breakctrl+break鍵強行中斷程序的運鍵強行中斷程序的運行。行。二、二、do.loopdo.loop語句語句13例題：求例題：求1+2+1+2+100+100的值的值程序：程序：條件 s=s+i i=i+1do whileloopi=

10、100s=0 i=1print s循環(huán)體循環(huán)體i=100?i=1開始輸出s結束否否是是s=0i=i+1s=s+i二、二、do.loopdo.loop語句語句14i=1i=1s=0s=0i=2i=2i=6i=6i=5i=5i=4i=4i=3i=3s=3s=3s=15s=15s=10s=10s=6s=6s=1s=1s=s+is=s+ii=i+1i=i+1s=s+is=s+ii=i+1i=i+1s=s+is=s+ii=i+1i=i+1s=s+is=s+ii=i+1i=i+1s=s+is=s+ii=i+1i=i+1如果用如果用do until.loopdo until.loop來求來求1+2+3+.+

11、1001+2+3+.+100的和，應何如修改代碼？的和，應何如修改代碼？二、二、do.loopdo.loop語句語句15s=0i=1do while i100s=s+ii=i+1loop總結：通過上述兩種方法，可以得知，總結：通過上述兩種方法，可以得知，前測前測型循環(huán)都是先判斷條件，再根據條件決定是型循環(huán)都是先判斷條件，再根據條件決定是否執(zhí)行循環(huán)體否執(zhí)行循環(huán)體。 do while.loopdo while.loop是當條件是當條件為為truetrue時才執(zhí)行，而時才執(zhí)行，而do until.loopdo until.loop是當是當條件為條件為falsefalse時才執(zhí)行時才執(zhí)行。二、二、do

12、.loopdo.loop語句語句16例題：求例題：求1010以內的奇數(shù)的和。以內的奇數(shù)的和。二、二、do.loopdo.loop語句語句private sub form_click()private sub form_click() dim i as integer dim i as integer dim s as integer dim s as integer i = 1 i = 1 s = 0 s = 0 do while i 10 do while i =10do until i=10如果用如果用do until.loopdo until.loop計算，應何如修改代碼？計算，應何如修

13、改代碼？17doexit doloop while （2 2）后測型循環(huán)）后測型循環(huán)二、二、do.loopdo.loop語句語句doexit doloop until 當型后測型當型后測型直到后測型直到后測型循環(huán)體循環(huán)體滿足條件？滿足條件？否否是是18說明：說明：1.1.后測型循環(huán)是先執(zhí)行循環(huán)體，再判斷條件，后測型循環(huán)是先執(zhí)行循環(huán)體，再判斷條件，根據條件成立與否決定是否執(zhí)行循環(huán)體，這根據條件成立與否決定是否執(zhí)行循環(huán)體，這種情況下，種情況下，至少執(zhí)行一次循環(huán)體至少執(zhí)行一次循環(huán)體。2.2.當當vbvb執(zhí)行執(zhí)行do.loop whiledo.loop while循環(huán)時，若條循環(huán)時，若條件為件為tru

14、etrue，執(zhí)行循環(huán)體，條件為，執(zhí)行循環(huán)體，條件為falsefalse時退時退出循環(huán)；當出循環(huán)；當vbvb執(zhí)行執(zhí)行do.loop untildo.loop until循環(huán)時，循環(huán)時，若條件為若條件為falsefalse，執(zhí)行循環(huán)體，條件為，執(zhí)行循環(huán)體，條件為truetrue時退出循環(huán)。時退出循環(huán)。3.3.在語句列中的任何位置都可放置在語句列中的任何位置都可放置exit doexit do語句，執(zhí)行語句，執(zhí)行exit doexit do語句時，就會語句時，就會退出循環(huán)退出循環(huán)。二、二、do.loopdo.loop語句語句19執(zhí)行過程：執(zhí)行過程：1.1.先把先把初值初值賦給循環(huán)變量；賦給循環(huán)變量；

15、2.2.然后執(zhí)行循環(huán)體，接著判斷條件，若符合然后執(zhí)行循環(huán)體，接著判斷條件，若符合條件，則繼續(xù)執(zhí)行循環(huán)體內語句，否則跳出條件，則繼續(xù)執(zhí)行循環(huán)體內語句，否則跳出循環(huán)執(zhí)行循環(huán)執(zhí)行l(wèi)ooploop后語句；后語句；3.3.執(zhí)行循環(huán)體時，若出現(xiàn)執(zhí)行循環(huán)體時，若出現(xiàn)exit doexit do語句，則語句，則無條件無條件跳出循環(huán)跳出循環(huán)，執(zhí)行，執(zhí)行l(wèi)ooploop后語句；后語句；4.4.要注意防止死循環(huán)的情況出現(xiàn)，若出現(xiàn)死要注意防止死循環(huán)的情況出現(xiàn)，若出現(xiàn)死循環(huán)，可按循環(huán)，可按ctrl+breakctrl+break鍵強行中斷程序的運鍵強行中斷程序的運行。行。二、二、do.loopdo.loop語句語句20

16、s=0i=1do s=s+i i=i+1loop while i=100print si=1開始開始結束結束s=0輸出輸出si=i+1s=s+1否否是是程序：程序：i =100?二、二、do.loopdo.loop語句語句如果用如果用do.loop untildo.loop until來求來求1+2+3+.+1001+2+3+.+100的和，應何如修改的和，應何如修改代碼？代碼？21s=0i=1dos=s+ii=i+1loop while i100總結：通過上述兩種方法，可以得知，總結：通過上述兩種方法，可以得知，后測型后測型循環(huán)都是先執(zhí)行循環(huán)體，再判斷條件，根據條循環(huán)都是先執(zhí)行循環(huán)體，再判斷

17、條件，根據條件決定是否執(zhí)行循環(huán)體。件決定是否執(zhí)行循環(huán)體。 do.loop whiledo.loop while是是當條件為當條件為truetrue時才執(zhí)行，而時才執(zhí)行，而do.loop untildo.loop until是當條件為是當條件為falsefalse時才執(zhí)行時才執(zhí)行。二、二、do.loopdo.loop語句語句22例題：假設例題：假設s=1s=12 23 3.n,n,求求s s不大于不大于400000400000時的最大的時的最大的n n值和此時值和此時s s的值。的值。二、二、do.loopdo.loop語句語句private sub command1_click()privat

18、e sub command1_click() dim s as long dim s as long dim n as integer dim n as integer s = 1 s = 1 n = 0 n = 0 do do n = n + 1 n = n + 1 s = s s = s * * n n loop while s = 400000 loop while s 400000loop until s 400000如果用如果用do.loop untildo.loop until計算，應何如修改代碼？計算，應何如修改代碼？23i=10s=0do while i=2 s=s+i s=s

19、+i i=i+1 i=i+1loopprint sprint ii=10s=0do s=s+i i=i+1loop while i8 b. i=8 c. i=8 d. i8 b. i=8 c. i=8 d. i8s=10i=9s=90i=8s=720i=7隨堂練習隨堂練習d. i8d. i8262.2.編寫代碼如下：編寫代碼如下：private sub command1_click()private sub command1_click()x=0 x=0do while x50do while x10do until a10 b=b b=b* *a+aa+a a=a+1 a=a+1looplo

20、opprint a;bprint a;bend subend sub隨堂練習隨堂練習程序運行后，單擊命令按程序運行后，單擊命令按鈕后，輸出的結果是（鈕后，輸出的結果是（ ）a.11a.11 210 b.10210 b.10 2020c.11c.11 410 d.10 410410 d.10 410a.11 210a.11 21028當型當型前測型循環(huán)前測型循環(huán)當型當型后測型循環(huán)后測型循環(huán)執(zhí)行循環(huán)體執(zhí)行循環(huán)體前前測試條件測試條件執(zhí)行循環(huán)體執(zhí)行循環(huán)體后后測試條件測試條件當條件當條件真真時執(zhí)行循環(huán)體時執(zhí)行循環(huán)體當條件當條件真真時執(zhí)行循環(huán)體時執(zhí)行循環(huán)體當條件當條件假假時跳出循環(huán)體時跳出循環(huán)體當條件當條件假假時跳出循環(huán)體時跳出循環(huán)體可能不執(zhí)行可能不執(zhí)行循環(huán)體循環(huán)體至少執(zhí)行一次至少執(zhí)行一次循環(huán)體循環(huán)體1.1.當型前測型與當型后測型的比較當型前測型與當型后測型的比較do whiledo w