資源簡(jiǎn)介 第3節(jié) For循環(huán)結(jié)構(gòu)考試內(nèi)容考試要求For語(yǔ)句格式cFor語(yǔ)句應(yīng)用cFor循環(huán)語(yǔ)句For 循環(huán)變量 = 初值 To 終值 Step 步長(zhǎng) 語(yǔ)句1 語(yǔ)句2 (循環(huán)體) ……Next循環(huán)變量返回判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。注意:(1)如果步長(zhǎng)為負(fù)數(shù),循環(huán)變量是否大于終值,成立繼續(xù)循環(huán)。(2)Step 1可以省略不寫(xiě)步長(zhǎng)為正數(shù)For循環(huán)流程圖【典例1】 For循環(huán)執(zhí)行過(guò)程填空。s = 0For i = 1 To 100 s = s + iNext i在右邊填寫(xiě)變量的值i = 1 時(shí),i<=100成立 s=______i = 2 時(shí),i<=100成立 s=______i = 3 時(shí),i<=100成立 s=______……i = 100 時(shí),i<=100成立, s=______i = 101 時(shí),i<=100不成立, 循環(huán)結(jié)束循環(huán)結(jié)束后變量s的值為_(kāi)_____,變量i的值為_(kāi)_______解析 本題主要考查For循環(huán)語(yǔ)句執(zhí)行的過(guò)程,判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。答案 1 3 6 5050 5050 101【變式訓(xùn)練】 For循環(huán)執(zhí)行過(guò)程填空。s = 0 : a = 1For i = 1 To 100 Step 1 IF i mod 2 = 0 Then s = s + iNext ii = 1 時(shí),i<=100成立 s=________ i = 2 時(shí),i<=100成立 s=________ i = 3 時(shí),i<=100成立 s=________i = 4 時(shí),i<=100成立 s=________……i = 100 時(shí),i<=100成立, s=________i = 101 時(shí),i<=100不成立, 循環(huán)結(jié)束循環(huán)結(jié)束后變量s的值為_(kāi)_______,變量i的值為_(kāi)_______解析 本題主要考查For循環(huán)語(yǔ)句和IF語(yǔ)句的結(jié)合,每次循環(huán)時(shí)IF語(yǔ)句條件i mod 2 =0成立時(shí),才執(zhí)行s = s + i。答案 0 2 2 6 2550 2550 101【典例2】 有如下VB程序段:s = 0For i = 1 To 10 Step 3 s = s + 1Next iLabel1.Caption = Str(s)該程序段運(yùn)行后標(biāo)簽Label1上顯示的內(nèi)容是( )A.2 B.3 C. 4 D. 5解析 本題主要考查For循環(huán)語(yǔ)句。判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For循環(huán)中,初值是1,終值是10,步長(zhǎng)是3,所以i=1、4、7、10時(shí),執(zhí)行s=s+1,程序結(jié)束時(shí),s=4。答案 C【變式訓(xùn)練】 有如下VB程序段:s = 0For i = 1 To 5 Step 2 s = s + iNext is = s + iLabel1.Caption = Str(s)該程序段運(yùn)行后標(biāo)簽Label1上顯示的內(nèi)容是( )A.3 B.9 C.14 D.16解析 本題主要考查For循環(huán)語(yǔ)句。判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For循環(huán)中,初值是1,終值是5,步長(zhǎng)是2,s=1+3+5=9。循環(huán)結(jié)束后i=7,然后執(zhí)行s = s + i=9+7=16。答案 D【典例3】 下列程序執(zhí)行后變量c的值( )s = “DZFad123”: c = 0For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= “A” And ch <= “F” Then c = c + 1 End IfNext iA.1 B.2 C.3 D.4解析 本題考查For循環(huán)和分支結(jié)構(gòu)。i的取值范圍是從1到8之間的正整數(shù)。If后面的語(yǔ)句判斷ch是否是“A”-“F”之間的字符。當(dāng)i=1,3時(shí),滿足If后面的語(yǔ)句,執(zhí)行c=c+1,所以c=2。所以答案選B。答案 B【典例4】 下列程序執(zhí)行后變量t的值( )s = “AaBb”t = “ ”For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= “a” And ch <= “z” Thench = Chr(Asc(ch) - 32) End If t = ch + tNext iA.“AaBb” B.“AABB”C.“BbAa” D.“BBAA”解析 本題考查For循環(huán)和If語(yǔ)句。i的取值范圍是從1到4之間的正整數(shù)。i=1時(shí),ch=“A”,t=“A”。i=2時(shí),ch=“a”,滿足if后面的語(yǔ)句,執(zhí)行then后面的語(yǔ)句,ch=“A”,t=“AA”。i=3時(shí),ch=“B”,t=“BAA”。i=4時(shí),ch=“b”,滿足If后面的語(yǔ)句,執(zhí)行then后面的語(yǔ)句,ch=“B”,t=“BBAA”。所以答案選D。答案 D【方法總結(jié)】 在For循環(huán)中,判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For與Next語(yǔ)句中的變量必須一致,執(zhí)行Next命令后,循環(huán)變量的值會(huì)自動(dòng)加上步長(zhǎng)的值。1.有如下的Visual Basic程序段:s=1For i=20 To________Step -2 s=s+iNext i若要使語(yǔ)句s=s+i執(zhí)行5次,則循環(huán)變量i終值應(yīng)為( )A.12 B.11 C.10 D.9解析 本題考查循環(huán)結(jié)構(gòu)相關(guān)知識(shí)點(diǎn)。循環(huán)次數(shù)=Int(終值-初值)/步長(zhǎng)+1。由此得到終值為12。答案 A2.下列程序執(zhí)行后變量s的值( )s = 1For i = 1 To 20 If i Mod 5 = 0 Then s = s + i End IfNext iA.50 B.51 C.31 D.30解析 本題考查For循環(huán)和分支結(jié)構(gòu)。i的取值范圍是從1到20之間的正整數(shù)。塊If語(yǔ)句中判斷i是否是5的倍數(shù),當(dāng)滿足i是5的倍數(shù)時(shí),執(zhí)行s=s+i,s=1+5+10+15+20=51。答案 B3.下列程序執(zhí)行后變量ans的值( )s = “A1B2C3”ans = “ ”For i = 1 To Len(s) ch = Mid(s, i, 1) If i Mod 2 = 0 Then ans = ans + chNext iA.“A1B” B.“123” C.“AB” D.“ABC”解析 本題考查For循環(huán)和分支結(jié)構(gòu)。i的取值范圍是從1到6之間的正整數(shù)。塊If語(yǔ)句中判斷i是否是偶數(shù),如果是偶數(shù),執(zhí)行ans = ans + ch語(yǔ)句,即將ch拼接到字符串a(chǎn)ns里。故答案是“123”。答案 B4.有如下Visual Basic程序:Private Sub Command1_Click( ) Dim s As Integer Dim i As Integer s=0 For i=1 To 10 s=s+i7 Next i Text1.Text=Str(s)End sub該程序段運(yùn)行后,文本框Text1中顯示________。解析 本題考查For循環(huán)。i的取值范圍是從1到10之間的正整數(shù)。i<7時(shí),i7=0,7≤i<10時(shí),i7=1,所以s=1+1+1+1=4。答案 4基礎(chǔ)鞏固1.有如下VB程序段:s = 1For i = 1 To 10 Step 3 s = s * iNext i上面循環(huán)結(jié)束后變量s的值為_(kāi)_____。解析 本題主要考查For循環(huán)語(yǔ)句。判斷循環(huán)變量是否小于終值,成立則繼續(xù)循環(huán)。s=1*4*7*10=280。答案 2802.有如下VB程序段:s = 0For i = 1 To 20 If i Mod 6 = 0 Then s = s + 1 End IfNext i上面循環(huán)結(jié)束后變量s的值為_(kāi)_______。解析 本題主要考查For循環(huán)語(yǔ)句分支結(jié)構(gòu)。i=6,12,18時(shí),滿足i Mod 6 = 0,執(zhí)行 s = s + 1語(yǔ)句,因此,循環(huán)結(jié)束后變量s=3。答案 33.有如下VB程序段:s = “DuBa98c”: c = 0For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= “A” And ch <= “Z” Then c = c + 1 End IfNext i上面循環(huán)結(jié)束后變量s的值為_(kāi)_____。解析 本題考查For循環(huán)和分支結(jié)構(gòu)。i的取值范圍是從1到7之間的正整數(shù)。If后面的語(yǔ)句判斷ch是否是“A”~“Z” 之間的字符。當(dāng)i=1、3時(shí),滿足If后面的語(yǔ)句,執(zhí)行c=c+1,因此,c=2。答案 24.有如下Visual Basic程序:x = 9For i = 3 To 22 Step 3 If (x / 2) >= i Then x = x+ 3Next iFor i = 2 To -22 Step 3 If (x / 3) >= i Then x = x + 3Next iText1.Text=Str(x+i)該程序的運(yùn)行結(jié)果是( )A.39 B.15 C.17 D.13解析 本題考查For循環(huán)和分支結(jié)構(gòu)。在第一個(gè)For循環(huán)中,初值是3,終值是22,步長(zhǎng)是3。i=3時(shí),滿足(x / 2) >= i,執(zhí)行x = x+ 3=12;i=6時(shí),滿足(x / 2) >= i,執(zhí)行x = x+ 3=15;i=9時(shí),不滿足(x / 2) >= i;i=12,15,18,21,時(shí),不滿足(x / 2) >= i。執(zhí)行完第一個(gè)For循環(huán)后,x=15,i=24。不滿足第二個(gè)For循環(huán)的初值i=2,故第二個(gè)For循環(huán)不執(zhí)行。因此,x + i=15+24=39。答案 A能力提升5.有如下Visual Basic程序:For i = 0 To 5 step 1 s = “ ” For j = 1 To 2 * i + 1 s = Str(j) + s Next j List1.AddItem sNext i該程序運(yùn)行后列表框輸出的第三行是( )A.123 B.321 C.12345 D.54321解析 本題考查雙重For循環(huán)。i=0時(shí),j=1 to 1,s=“1” ,列表框輸出的第一行是1;i=1時(shí),j=1 to 3,s=“321” ,列表框輸出的第二行是321; i=2時(shí),j=1 to 5,s=“54321” ,列表框輸出的第三行是54321。 答案 D6.For i=1 To 3 k =“ ” For j=1 To ik = k+“*” Next j List1.AddItem kNext i該程序運(yùn)行后, 在列表框List中顯示的是( )解析 本題考查雙重For循環(huán)。i=1時(shí),j=1 to 1,k=“*”;i=2時(shí),j=1 to 2,k=“**”;i=3時(shí),j=1 to 3,k=“***”。因此,答案選A。答案 A7.編寫(xiě)Visual Basic程序,實(shí)現(xiàn)顯示九九乘法表,程序運(yùn)行界面如圖所示。單擊“顯示”按鈕(Command1),在列表框List1中輸出一張九九乘法表。(1)要使窗體的標(biāo)題顯示為“九九乘法表”,可在其屬性窗口中將________屬性值修改為“九九乘法表”。(2)為實(shí)現(xiàn)上述功能,請(qǐng)?jiān)趧澗€處填入合適代碼。Private Sub Command1_Click( ) Dim s As String Dim i As Integer, j As Integer For i=1 To 9s=“ ”For j=1 To __①__ s=s+Str(j)+“*”+Str(i)+“=”__②__ +“ ”Next jList1.AddItem s Next ____③____End Sub解析 本題使用雙重For循環(huán)語(yǔ)句實(shí)現(xiàn)乘法口訣表的輸出。口訣表一共有9行,第i行有i個(gè)口訣,第i行口訣的被乘數(shù)為i,乘數(shù)的范圍是l到i,結(jié)果為i和j的乘積。因此,外重循環(huán)For i為1到9,內(nèi)重循環(huán)For j為1到i,結(jié)果為i*j。答案 (1)Caption (2)①i ②str(i*j)(或str(j*i)) ③i課件16張PPT。第3節(jié) For循環(huán)結(jié)構(gòu)For循環(huán)語(yǔ)句【典例1】 For循環(huán)執(zhí)行過(guò)程填空。解析 本題主要考查For循環(huán)語(yǔ)句執(zhí)行的過(guò)程,判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。答案 1 3 6 5050 5050 101【變式訓(xùn)練】 For循環(huán)執(zhí)行過(guò)程填空。解析 本題主要考查For循環(huán)語(yǔ)句和IF語(yǔ)句的結(jié)合,每次循環(huán)時(shí)IF語(yǔ)句條件i mod 2 =0成立時(shí),才執(zhí)行s = s + i。答案 0 2 2 6 2550 2550 101【典例2】 有如下VB程序段:s = 0For i = 1 To 10 Step 3 s = s + 1Next iLabel1.Caption = Str(s)該程序段運(yùn)行后標(biāo)簽Label1上顯示的內(nèi)容是( )A.2 B.3 C. 4 D. 5解析 本題主要考查For循環(huán)語(yǔ)句。判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For循環(huán)中,初值是1,終值是10,步長(zhǎng)是3,所以i=1、4、7、10時(shí),執(zhí)行s=s+1,程序結(jié)束時(shí),s=4。答案 C【變式訓(xùn)練】 有如下VB程序段:s = 0For i = 1 To 5 Step 2 s = s + iNext is = s + iLabel1.Caption = Str(s)該程序段運(yùn)行后標(biāo)簽Label1上顯示的內(nèi)容是( )A.3 B.9 C.14 D.16解析 本題主要考查For循環(huán)語(yǔ)句。判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For循環(huán)中,初值是1,終值是5,步長(zhǎng)是2,s=1+3+5=9。循環(huán)結(jié)束后i=7,然后執(zhí)行s = s + i=9+7=16。答案 D【典例3】 下列程序執(zhí)行后變量c的值( )s = “DZFad123”: c = 0For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= “A” And ch <= “F” Then c = c + 1 End IfNext iA.1 B.2 C.3 D.4解析 本題考查For循環(huán)和分支結(jié)構(gòu)。i的取值范圍是從1到8之間的正整數(shù)。If后面的語(yǔ)句判斷ch是否是“A”-“F”之間的字符。當(dāng)i=1,3時(shí),滿足If后面的語(yǔ)句,執(zhí)行c=c+1,所以c=2。所以答案選B。答案 B【典例4】 下列程序執(zhí)行后變量t的值( )s = “AaBb”t = “ ”For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= “a” And ch <= “z” Thench = Chr(Asc(ch) - 32) End If t = ch + tNext iA.“AaBb” B.“AABB”C.“BbAa” D.“BBAA”解析 本題考查For循環(huán)和If語(yǔ)句。i的取值范圍是從1到4之間的正整數(shù)。i=1時(shí),ch=“A”,t=“A”。i=2時(shí),ch=“a”,滿足if后面的語(yǔ)句,執(zhí)行then后面的語(yǔ)句,ch=“A”,t=“AA”。i=3時(shí),ch=“B”,t=“BAA”。i=4時(shí),ch=“b”,滿足If后面的語(yǔ)句,執(zhí)行then后面的語(yǔ)句,ch=“B”,t=“BBAA”。所以答案選D。答案 D【方法總結(jié)】 在For循環(huán)中,判斷循環(huán)變量是否小于終值,成立繼續(xù)循環(huán)。For與Next語(yǔ)句中的變量必須一致,執(zhí)行Next命令后,循環(huán)變量的值會(huì)自動(dòng)加上步長(zhǎng)的值。 展開(kāi)更多...... 收起↑ 資源列表 第3節(jié) For循環(huán)結(jié)構(gòu).doc 第三單元第3節(jié) For循環(huán)結(jié)構(gòu).pptx 縮略圖、資源來(lái)源于二一教育資源庫(kù)