




版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、精選優(yōu)質(zhì)文檔-傾情為你奉上循環(huán)結(jié)構(gòu)是指在一定條件下多次重復(fù)執(zhí)行一組語(yǔ)句。VB中提供了兩種循環(huán)語(yǔ)句,它們是For語(yǔ)句和Do語(yǔ)句。 1. For循環(huán)語(yǔ)句 如果己知某一段代碼需要重復(fù)執(zhí)行的次數(shù),可以使用For循環(huán)語(yǔ)句。該語(yǔ)句的一般形式如下: For<循環(huán)變量>=<初值>To<終值>Step<步長(zhǎng)> <語(yǔ)句塊> Exit ForNext<循環(huán)變量>例如:For i=l To 8 Step1 Print “這是文本”&iNext i
2、; 該段代碼的功能是在窗體上顯示8行文本,如圖3.16所示。如果不采用循環(huán)結(jié)構(gòu),則需要使用8條Print語(yǔ)句來(lái)實(shí)現(xiàn)相同的功能。For語(yǔ)句中的循環(huán)變量必須是數(shù)值型,初值、終值以及步長(zhǎng)則是具體的數(shù)值Fornext步長(zhǎng)用來(lái)指定循環(huán)變量每次的增量,當(dāng)所有循環(huán)體中的語(yǔ)句都執(zhí)行后,循環(huán)變量就會(huì)自動(dòng)增加一個(gè)步長(zhǎng)。默認(rèn)的步長(zhǎng)為1.For語(yǔ)句的執(zhí)行流程如圖3.17所示。 具體執(zhí)行流程為: (1)將初值賦給循環(huán)變量。 (2)判斷循環(huán)變量的取值是否在終值范圍內(nèi)否則結(jié)束循環(huán),執(zhí)行Next
3、的下一條語(yǔ)句。 (3)將循環(huán)變量的取值自動(dòng)增加一個(gè)步長(zhǎng),然后回轉(zhuǎn)到步驟(2)繼續(xù)執(zhí)行。 若是則執(zhí)行循環(huán)體內(nèi)的語(yǔ)句,循環(huán)中可以在任何位置放置任意個(gè)Exit FOr語(yǔ)句,該語(yǔ)句的作用是退出循環(huán),轉(zhuǎn)到Next語(yǔ)句的下一條語(yǔ)句。Exit For語(yǔ)句經(jīng)常在條件判斷之后使用,例如在IfThen語(yǔ)句之后。 例如,修改上例如下: For I=1 To 10 For J=1 To 10 For K= 1 To 10 . Next K Next JNext I實(shí)例3.3打印九九乘法表
4、 本例講解怎樣打印九九乘法表,如圖3.18所示。九九乘法表的打印看起來(lái)很煩瑣,但是如果使用嵌套循環(huán),則問(wèn)題變得非常簡(jiǎn)單。 打開(kāi)【代碼】窗口,編寫(xiě)窗體的Click事件過(guò)程如下: Private Sub form_Click()Print“-九九乘法表-”P(pán)rintFor i=1 To 9 For j=1 To i s=i*j Print j & “X”& i & “=” & s Next j Print Next iEnd Sub 在該段代碼中,首先使用Pr
5、int方法打印出標(biāo)題和一個(gè)空行。然后使用了一個(gè)兩重的嵌套循環(huán)結(jié)構(gòu)。關(guān)于Print方法的使用細(xì)節(jié)請(qǐng)參見(jiàn)下一章。2.Do循環(huán)語(yǔ)句 如果不知道某一段代碼需要重復(fù)執(zhí)行的次數(shù),可以使川Do循環(huán)語(yǔ)句0該語(yǔ)句有兩種基本形式: (1)Do While<表達(dá)式> 循環(huán)體 Exit Do Loop 這種格式的Do循環(huán)先判斷條件,后執(zhí)行循環(huán)體。與IfThen語(yǔ)句類(lèi)似,While子句的<
6、表達(dá)式>一般是關(guān)系表達(dá)式或邏輯表達(dá)式,也可以是算術(shù)表達(dá)式。如果表達(dá)式的值不為零(True),即條柞為真,則執(zhí)行循環(huán)體。如果表達(dá)式的值為零False) ,即條件為假,則終止循環(huán)。其流程如圖3.19所示。 例如,通過(guò)下列代碼,可以求出2460和345的最大公約數(shù)。 Private Sub Form_Click()m=2460:n=345Dim s As SingleDo while(n<>0) s=m Mod n m=n n=sLoop Print“最大公約數(shù)=” & mEnd Sub 在
7、DoLoop中可以在任何位置放置任意個(gè)數(shù)的Exit Do語(yǔ)句,隨時(shí)跳出Do-Loop循環(huán)。Exit Do通常用于條件判斷之后,例如Ifthen,在這種情況下,Exit Do語(yǔ)句將控制權(quán)轉(zhuǎn)移到緊接在Loop命令之后的語(yǔ)句。如果Exit Do使用在嵌套的DoLoop語(yǔ)句中,則Exit Do會(huì)將控制權(quán)轉(zhuǎn)移到Exit Do所在位置的外層循環(huán)。 While子句也可以出現(xiàn)在Loop語(yǔ)句后,形式如下: Do. 循環(huán)體。 Exit Do. Loop While<表達(dá)式>. 這種格式的特點(diǎn)是先執(zhí)行循環(huán)體,后判斷條件。也就是說(shuō)第一次進(jìn)入循環(huán)是無(wú)條件的。循環(huán)體至少會(huì)被執(zhí)行一次,其流程如圖3.20所示。而如果While子句出現(xiàn)在Do后,則可能一次也不執(zhí)行。 (2) Do Until<表達(dá)式>. 循環(huán)體。 Exit Do. Loop. 將Whi
溫馨提示
- 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ì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 租賃房屋用水管理辦法
- 租賃資產(chǎn)臺(tái)賬管理辦法
- 稅收遵從協(xié)議管理辦法
- 等效可用系數(shù)管理辦法
- 管家技能提升管理辦法
- 管理人員領(lǐng)用管理辦法
- 管理平臺(tái)運(yùn)行管理辦法
- 經(jīng)營(yíng)計(jì)劃考核管理辦法
- 絕密項(xiàng)目保密管理辦法
- 美國(guó)食品進(jìn)口管理辦法
- 【課件】第五單元化學(xué)反應(yīng)的定量關(guān)系新版教材單元分析九年級(jí)化學(xué)人教版(2024)上冊(cè)
- 十堰房縣國(guó)有企業(yè)招聘筆試題庫(kù)2024
- 滬教版小學(xué)六年級(jí)語(yǔ)文上學(xué)期考前練習(xí)試卷-含答案
- 04S519小型排水構(gòu)筑物(含隔油池)圖集
- 外研版(2024)七年級(jí)上冊(cè)英語(yǔ)全冊(cè)教案教學(xué)設(shè)計(jì)
- 研討報(bào)告的格式范文模板
- 山東省青島市2023-2024學(xué)年五年級(jí)下學(xué)期6月期末科學(xué)試題
- GB/T 44130.1-2024電動(dòng)汽車(chē)充換電服務(wù)信息交換第1部分:總則
- 中考重慶作文滿(mǎn)分范文英語(yǔ)
- 傷口造口進(jìn)修匯報(bào)護(hù)理
- GB/T 43635-2024法庭科學(xué)DNA實(shí)驗(yàn)室檢驗(yàn)規(guī)范
評(píng)論
0/150
提交評(píng)論