程序的循環(huán)結(jié)構(gòu)下

For 代碼s = 0n = 2For i = 1 To 10 Step 1s = s + 1 / nn = n + 2Next iPrint sy = 1 / 2 + 1 / 4 + 1 / 6 + 1 / 8 + 1 / 10 + 1 / 12 + 1 / 14 + 1 / 16 + 1 / 18 + 1 / 20Print y For 循環(huán)語句的基本格式For 循環(huán)變量=初值 To 終值 Step 步長 語句組（循環(huán)體）Next 循環(huán)變量 1、for語句與next語句必須成對(duì)出現(xiàn)，缺一不可。 2、for語句必須在next語句之前。 3、for語句中的“循環(huán)變量”與next語句中的“循環(huán)變量”必須一致。 4、如果步長為1，則“step 1”可省略。注意：循環(huán)體執(zhí)行次數(shù)（終值初值）步長 Do 代碼 s=0 n=2 i=1 do while i=10 s=s+1/n n=n+2 i=i+1 loop Print s Do 循環(huán)語句 前面我們已經(jīng)學(xué)過FOR 循環(huán)語句，它適于知道重復(fù)次數(shù)的循環(huán)。但在許多實(shí)際問題中常常難以預(yù)先確定重復(fù)的次數(shù)，這時(shí)就不能使用FOR 循環(huán)語句。為此，VB語言還提供了一種稱為DO循環(huán)的語句，使得循環(huán)更加靈活方便。 Do 循環(huán)語句的基本格式Do 循環(huán)體Loop Until 循環(huán)終止條件 （while 循環(huán)條件）其中：循環(huán)體是一組VB語句；循環(huán)終止條件是一個(gè)邏輯表達(dá)式。 執(zhí)行循環(huán)體滿足循環(huán)終止條件嗎？是否 實(shí)踐1已知S=1+2+3+N，找出一個(gè)最大的整數(shù)N，使得S= 30000 Print n-1 課堂實(shí)踐：利用計(jì)算機(jī)計(jì)算出手折出珠峰高度需要的次數(shù)！想一想， 讓珠峰在你手中生成！假設(shè)一張紙足夠長，紙厚度為0.5毫米，問重疊幾次后的厚度大于珠穆瑯瑪峰的高度（8848.13m）分析：假設(shè)折疊第n次后超過珠峰：折疊n次折疊次0.5*2折疊次(0.5*2)*2折疊次(0.5*2)2)2 0.5*2n判斷條件：0.5*2n8848130 折出珠峰程序代碼實(shí)現(xiàn)： Private Sub Command1_Click() n = 0 h=0.5 Do n = n + 1 h = 0.5 * 2 n或h=h*2 Loop Until h 8848130 Print n End Sub 幾種循環(huán)語句的比較For循環(huán)語句用于描述預(yù)先知道循環(huán)次數(shù)的循環(huán)結(jié)構(gòu)，是一種計(jì)數(shù)循環(huán)；Do循環(huán)語句是根據(jù)條件是否滿足而決定循環(huán)是否繼續(xù)進(jìn)行，而條件的判斷可以在循環(huán)語句的開始部分設(shè)立（這時(shí)先判斷條件再進(jìn)入循環(huán)體），也可以把條件判斷放在循環(huán)語句的結(jié)尾部分（這時(shí)首先執(zhí)行一次循環(huán)體再對(duì)條件做判斷） Do循環(huán)的幾種變形的比較 Do 循環(huán)體 Loop while 條件注釋:先執(zhí)行后判斷 Do while 條件循環(huán)體 Loop注釋:先判斷后執(zhí)行當(dāng)型do循環(huán)：當(dāng)條件被滿足時(shí),執(zhí)行循環(huán) Do 循環(huán)體 Loopuntil 條件注釋:先執(zhí)行后判斷 Do until 條件循環(huán)體 Loop注釋:先判斷后執(zhí)行直到型do循環(huán)：直到條件滿足時(shí),退出循環(huán) Do循環(huán)的幾種變形程序框圖執(zhí)行循環(huán)體滿足條件嗎？否是執(zhí)行循環(huán)體滿足條件嗎？是否 當(dāng)型直到型 執(zhí)行循環(huán)體滿足條件嗎？是否執(zhí)行循環(huán)體滿足條件嗎？否是當(dāng)直到