版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
循環(huán)嵌套例1、VB窗體輸出如下的圖形:
********************提示:(1)先編寫(xiě)程序,實(shí)現(xiàn)一行“*”的打印,用for…next循環(huán)語(yǔ)句Forj=1to5
Print“*”;Nextj(2)把每行看做一個(gè)“整體”,問(wèn)題就轉(zhuǎn)化為:?jiǎn)栴}就變成打印4個(gè)“整體”,每打印完一個(gè),需換一行。Fori=1to4
打印“一行*”P(pán)rintNexti(3)把“打印“一行*”,用(1)所編寫(xiě)的代碼代替.Fori=1to4
Forj=1to5
Print“*”;
NextjPrintNexti實(shí)踐1,在VB窗體上打印如下的圖形:***************For
i=1to5For
j=1toiprint“*”;Nextj打印每行For
j=1toiprint“*”;NextjprintNexti實(shí)踐2,在VB窗體上打印如下的圖形:112123123412345Fori=1To5
Forj=1ToiPrintj;
NextjPrintNexti思考:上個(gè)題目中,print
j;語(yǔ)句運(yùn)行了幾次?Print語(yǔ)句運(yùn)行了幾次?Ci=0:cj=0Fori=1To5
Forj=1ToiPrintj;cj=cj+1NextjPrintci=ci+1NextiPrintci,cjCj=1+2+3+4+5=15Ci=5數(shù)組:用于存儲(chǔ)一批同類(lèi)型的數(shù)據(jù),把這些數(shù)據(jù)組成一個(gè)序列。下標(biāo):某個(gè)數(shù)據(jù)在這個(gè)序列中的位置。例1、把1,2,4,8,……,2^10存儲(chǔ)在數(shù)組中,并在VB窗體上逐個(gè)打印。數(shù)組的定義:Dim數(shù)組名(A1toA2)As類(lèi)型,其中A1是這個(gè)序列下標(biāo)的下界,A2是上界,都是整數(shù)型常量。例如:Dimd(1to10)AsInteger:數(shù)組中數(shù)據(jù)的調(diào)用:數(shù)組名(i),i是下標(biāo)例如:d(2)表示d數(shù)組的編號(hào)為2的數(shù)據(jù);Dimd(1to11)asintegerFori=1to11d(i)=2^(i-1)printd(i);NextiDimd(1To10,1To10)AsIntegerFori=1To10Forj=1Toid(i,j)=i+jNextjNextiPrintd(4,2);閱讀程序,寫(xiě)結(jié)果23
44
5
6567867
8
9
10......課本P81第5題Dima(1To10)AsIntegerDimb(1To5)AsIntegerFori=1To10a(i)=Int(Rnd()*100+1)NextiFori=1To5b(i)=a(2*i-1)+a(2*i)NextiFori=1To10Printa(i);NextiPrintFori=1To5Printb(i);Nexti2
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025-2026學(xué)年晉中市靈石縣數(shù)學(xué)三年級(jí)第一學(xué)期階段質(zhì)量跟蹤監(jiān)視模擬試題含解析
- 重慶市合川區(qū)2025-2026學(xué)年八年級(jí)上學(xué)期期中語(yǔ)文試題(無(wú)答案)
- 血液濾過(guò)護(hù)理團(tuán)隊(duì)協(xié)作探討
- 2026年重慶科技大學(xué)單招職業(yè)適應(yīng)性測(cè)試模擬測(cè)試卷附答案
- 2026年長(zhǎng)沙職業(yè)技術(shù)學(xué)院?jiǎn)握新殬I(yè)技能考試題庫(kù)及答案1套
- 2026年長(zhǎng)治職業(yè)技術(shù)學(xué)院?jiǎn)握新殬I(yè)技能考試模擬測(cè)試卷必考題
- 2026年青島恒星科技學(xué)院?jiǎn)握新殬I(yè)適應(yīng)性測(cè)試模擬測(cè)試卷附答案
- 2026年青海高等職業(yè)技術(shù)學(xué)院?jiǎn)握新殬I(yè)適應(yīng)性考試模擬測(cè)試卷及答案1套
- 2026年黃岡職業(yè)技術(shù)學(xué)院?jiǎn)握新殬I(yè)技能測(cè)試模擬測(cè)試卷及答案1套
- 2026年黑龍江農(nóng)業(yè)經(jīng)濟(jì)職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能考試模擬測(cè)試卷附答案
- 基坑安全工程題庫(kù)及答案解析
- 《人間充質(zhì)基質(zhì)細(xì)胞來(lái)源細(xì)胞外囊泡凍干粉質(zhì)量要求》(征求意見(jiàn)稿)
- 2025年海南省中級(jí)經(jīng)濟(jì)師考試(工商管理專(zhuān)業(yè)知識(shí)和實(shí)務(wù))能力提高訓(xùn)練試題庫(kù)及答案
- 鄉(xiāng)鎮(zhèn)村監(jiān)會(huì)培訓(xùn)課件
- 入團(tuán)申請(qǐng)書(shū)教學(xué)課件
- 松下微波爐NN-DS581M使用說(shuō)明書(shū)
- 排水系統(tǒng)運(yùn)維人員培訓(xùn)方案
- 2025年江蘇省招聘警務(wù)輔助人員考試真題及答案
- 血透室院感相關(guān)課件
- (2025年標(biāo)準(zhǔn))sm調(diào)教協(xié)議書(shū)
- 蘇教版(2025)八年級(jí)上冊(cè)生物期末復(fù)習(xí)全冊(cè)知識(shí)點(diǎn)提綱(搶先版)
評(píng)論
0/150
提交評(píng)論