vb-4-循環(huán)結(jié)構(gòu)程序設(shè)計(jì)-實(shí)例-展示頁
2025-01-21 20:57本頁面
【正文】 十章 第十一章 第四章 VB程序設(shè)計(jì) ?處理第 1個數(shù)據(jù) ? 產(chǎn)生一個隨機(jī)數(shù) ， 存放在變量 a中 ? 將 a顯示在標(biāo)簽 （ lblData） 中 ? 將 a作為當(dāng)前最大值放在變量 max中 ?處理第 2個數(shù)據(jù) ? 產(chǎn)生新的隨機(jī)數(shù) ， 存放在變量 a中 ? 將 a連接顯示在標(biāo)簽 （ lblData） 原有內(nèi)容之后 ? 如果 a大于 max， 則將 a作為最大值放在 max中 編程分析 a = Int(Rnd * 100) + 1 = a max = a a = Int(Rnd * 100) + 1 = amp。第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) 第 4章 循環(huán)結(jié)構(gòu)程序設(shè)計(jì) ? 循環(huán)結(jié)構(gòu) ? 用 ForNext語句實(shí)現(xiàn)循環(huán)結(jié)構(gòu) ? 用 Do WhileLoop語句實(shí)現(xiàn)循環(huán)結(jié)構(gòu) ? 嵌套的循環(huán)結(jié)構(gòu) 第七次課 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) For 循環(huán)變量 = 初值 To 終值 Step 步長 循環(huán)體語句 Next [循環(huán)變量 ] For— Next循環(huán)的一般語法格式 步長為 1時可省略 步長可取正或負(fù)數(shù)；步長為負(fù)時終值應(yīng)小于初值 成對出現(xiàn) 循環(huán)變量值介于初值 和 終值之間時反復(fù)執(zhí)行 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) ? ForNext常用于 循環(huán)次數(shù)已知 的循環(huán)中 ?循環(huán)體語句可以是 一條或多條 語句 ?可以使用 Exit For語句 提前結(jié)束 循環(huán) For i =1 To 10 x = x + Int( Rnd * 100 ) sum = sum + x If sum 300 Then Exit For End If Next i Print sum 程序說明 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) 【 例 】 找最大值 。 單擊最大值按鈕時產(chǎn)生 10個1～ 100之間的隨機(jī)整數(shù)顯示在框架內(nèi)的標(biāo)簽中 ， 同時將最大值顯示在下方的標(biāo)簽內(nèi) 。 , amp。 , amp。 連續(xù)彈出輸入框接收成績，直至 1時結(jié)束 計(jì)算總成績和平均成績 多行文本框 Lblaverage Lblsum txtscore 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) ?輸入第 1個數(shù)據(jù) ? 輸入第一個數(shù)據(jù) ， 存放在變量 score中 ?判斷輸入的數(shù)據(jù)是否是 1， 如果不是 1 ? 記錄已經(jīng)輸入的學(xué)生人數(shù) ? 將數(shù)據(jù)顯示在 txtscore原有內(nèi)容之后 中 ? 計(jì)算總成績 ? 接收下一個數(shù)據(jù) 編程分析 — 成績輸入 score = Val( ) InputBox(“請輸入 ...”, “成績輸入 , 1) n = n + 1 = amp。 Chr(13) amp?？偝煽? Dim n As Integer 39。 score amp。 Chr(10) sum = sum + score score = Val(InputBox(請輸入 ..., 成績輸入 , 1)) Loop End Sub 程序代碼 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) Private Sub cmdCala_Click() Dim ave As Single = sum ave = sum / n = ave End Sub 程序代碼 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) 【 程序改進(jìn) 】 修改上例，當(dāng)輸入非法成績時，再次彈出輸入框等待重新輸入，直至輸入 1 ~ 100之間的整數(shù)為止。 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設(shè)計(jì) 循環(huán)的嵌套 ? 在一個循環(huán)體內(nèi)又出現(xiàn)另外的循環(huán)語句稱為循環(huán)嵌套，也稱為多重循環(huán)。 ? 多重循環(huán)的執(zhí)行過程是，外循環(huán)每執(zhí)行一次，內(nèi)循環(huán)都要從頭到尾執(zhí)行一遍。 For I=1 To 10 … For J=1 To 20 … Next J Next I … Do … For J=1 To 20 … Next J … Loop While I=10 For I=1 To 10 … Do While J=20 … Loop … Next I Do … Do While J=20 … Loop … Loop Until I10 For I=1 To 10 … For J=1 To 20 … Next I Next J … Do
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1