第43講 多重循環(huán)

1、第43講 多重循環(huán)的概念和使用一、循環(huán)結(jié)構(gòu)語句使用復(fù)習(xí)上節(jié)課可我們講了兩種循環(huán)結(jié)構(gòu)語句的格式（見下3、所示）1、運(yùn)行For語句和Do語句的循環(huán)語句的功能示(注意步長為負(fù)時(shí)，如-1時(shí)For語句的運(yùn)行情況討論)，掌握它們的功能； 2、例2：求S=1+1/2+1/3+1/n的循環(huán)結(jié)構(gòu)程序如下：（演示：，再一次說明為什么要用第二種Do循環(huán)語句）S = 0n = Val() (因?yàn)闂l件表達(dá)式是數(shù)值比較，所以要把得到的字符串?dāng)?shù)字轉(zhuǎn)為數(shù)值類型，例如：”100”à100)Do While n < 1 Or n <> Fix(n) Fix(x)是取整函數(shù)； n = InputBox(

2、"輸入n不是自然數(shù)，請重新輸入n=?") 輸入框：InputBox Text1.Text = n n = Val(n) (因?yàn)闂l件表達(dá)式是數(shù)值比較，所以要把InputBox得到的Loop 字符串?dāng)?shù)字轉(zhuǎn)為數(shù)值類型，例如：”100”à100)For k = 1 To n S = S + 1 / k 循環(huán)求S=1+1/2+1/3+1/n Next kText2.Text = S3、兩種循環(huán)結(jié)構(gòu)語句的格式： (1) For語句的一般格式： P79For 循環(huán)變量=初值 To 終值 Step 步長程序段Next循環(huán)變量 （當(dāng)循環(huán)變量沒超出終值時(shí)，執(zhí)行程序段）(2) Do語句

3、的常用格式： P80Do While 條件表達(dá)式 （當(dāng)條件成立時(shí)，進(jìn)入循環(huán)，執(zhí)行程序段） 程序段Loop (負(fù)責(zé)回到條件表達(dá)式，判斷是否成立？)提問：程序段的結(jié)構(gòu)是什么樣的？ 就是以前講的程序有三種基本控制結(jié)構(gòu)：順序結(jié)構(gòu)、(分支)選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)！這三種基本控制結(jié)構(gòu)通常會被組合起來使用，以表達(dá)各種較為復(fù)雜的問題的算法。例如：1、 在(分支)選擇模式內(nèi)嵌入(分支)選擇模式；2、 在循環(huán)模式內(nèi)嵌入循環(huán)模式； 3、 在循環(huán)模式內(nèi)嵌入在(分支)選擇模式；在(分支)選擇模式內(nèi)嵌入循環(huán)模式；因此，循環(huán)內(nèi)的程序段可以再包含選擇模式和循環(huán)模式，今天我們先來討論：循環(huán)內(nèi)的程序段可以再包含循環(huán)模式多重循環(huán)的使用

4、！如果一層循環(huán)內(nèi)只包含一層循環(huán)，我們把它叫做雙重循環(huán)，掌握了雙重循環(huán)的用法，那么多重循環(huán)也就容易使用掌握了。二、雙重循環(huán)的使用： 1、一般結(jié)構(gòu)：（以For語句為例）For 循環(huán)變量A=初值 To 終值 Step 步長外循環(huán)內(nèi)循環(huán)For 循環(huán)變量B=初值 To 終值 Step 步長程序段Next循環(huán)變量BNext循環(huán)變量A 2、雙重循環(huán)執(zhí)行實(shí)例： 雙重循環(huán)是如何執(zhí)行的呢？我們來看下面：實(shí)例1：For i=1 To 3 Step 1For j=1 To 5 Step 1 Str(i) + "*" + Str(j) 復(fù)習(xí)列表框的作用， Next j Next i 運(yùn)行、演示多重循

5、環(huán)程序； 從實(shí)際演示可知：當(dāng)i=1時(shí)，j=1、2、3、4、5； 當(dāng)i=2時(shí)，j= 2、3、4、5；當(dāng)i=3時(shí)，j= 3、4、5；規(guī)律總結(jié)：先外循環(huán)，后內(nèi)循環(huán)，內(nèi)循環(huán)完成后，再進(jìn)入外循環(huán)；For i=1 To 5 Step 1For j=a To b Step 1Print "*"NextjPrintNexti實(shí)例2：打印(輸出)用“*”組成的圖形；右邊程序中，只要改變a、b的值，便打印出用“*”組成的各種圖形；（演示） 注意：Print "*" 后分號“；” 表示不換行，下次循環(huán)打印還在同一行上。用立即方式驗(yàn)證如下： Print "3"

6、;；"+" ；"9="；3*93+9= 27 提問：輸出 3*9=27 的語句有幾種寫法？（用立即方式展示） 實(shí)例3：修改實(shí)例2，可得到一個(gè)九九乘法表，程序如下： For i=1 To 9 Step 1For j=i To 9 Step 1Print Str(i) + "*" + Str(j)+ "="i*j;NextjPrint 打印空行，起到換行的作用！Next i講解上程序，演示九九乘法表程序；注意：為了內(nèi)、外循環(huán)程序結(jié)構(gòu)層次清楚，上面程序的同一個(gè)循環(huán)語句For/Next上下對齊，而且內(nèi)循環(huán)語句縮進(jìn)2格書寫；

7、小結(jié)：1、循環(huán)內(nèi)的程序段可以再包含循環(huán)模式，我們稱為多重循環(huán)；如果一層循環(huán)內(nèi)只包含一層循環(huán)，我們把它叫做雙重循環(huán)。2、雙重循環(huán)的運(yùn)行是先外循環(huán)，后內(nèi)循環(huán)，內(nèi)循環(huán)完成后，再進(jìn)入外循環(huán)；（多重循環(huán)運(yùn)行次序也一樣類推，見課本P22-23(P96-97)的包裝問題算法）；三、練習(xí)1、 理解多重循環(huán)的概念；2、 以上實(shí)例1、2、3為操作實(shí)例，運(yùn)行：和，掌握雙重循環(huán)的用法；3、運(yùn)行實(shí)例3程序（在中），打印(輸出)用“*”組成的圖形；修改程序（改變循環(huán)的初值a、終值b），打印出用“*”組成的各種圖形。4、（機(jī)動題）理解P22-23(P96-97)的包裝問題算法，運(yùn)行，理解其程序代碼（見P97或下面程序清單，這是個(gè)三重循環(huán)）。 2010/03/22Sub Command1_Click() Dim x, y, z, c As Integer c = 0 For x = 1 To 293For y = 1 To 118For z = 1 To 74If 2 * x + 5 * y + 8 * z = 600 ThenList1.AddItem