vb-4-循環(huán)結構程序設計-實例(已修改)
2025-01-24 20:57 本頁面
【正文】 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 第 4章 循環(huán)結構程序設計 ? 循環(huán)結構 ? 用 ForNext語句實現循環(huán)結構 ? 用 Do WhileLoop語句實現循環(huán)結構 ? 嵌套的循環(huán)結構 第七次課 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 For 循環(huán)變量 = 初值 To 終值 Step 步長 循環(huán)體語句 Next [循環(huán)變量 ] For— Next循環(huán)的一般語法格式 步長為 1時可省略 步長可取正或負數；步長為負時終值應小于初值 成對出現 循環(huán)變量值介于初值 和 終值之間時反復執(zhí)行 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ? ForNext常用于 循環(huán)次數已知 的循環(huán)中 ?循環(huán)體語句可以是 一條或多條 語句 ?可以使用 Exit For語句 提前結束 循環(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程序設計 【 例 】 找最大值 。 單擊最大值按鈕時產生 10個1～ 100之間的隨機整數顯示在框架內的標簽中 ， 同時將最大值顯示在下方的標簽內 。 lbldata lblmax 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ?處理第 1個數據 ? 產生一個隨機數 ， 存放在變量 a中 ? 將 a顯示在標簽 （ lblData） 中 ? 將 a作為當前最大值放在變量 max中 ?處理第 2個數據 ? 產生新的隨機數 ， 存放在變量 a中 ? 將 a連接顯示在標簽 （ lblData） 原有內容之后 ? 如果 a大于 max， 則將 a作為最大值放在 max中 編程分析 a = Int(Rnd * 100) + 1 = a max = a a = Int(Rnd * 100) + 1 = amp。 , amp。 a If a max Then max = a End If 9次 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 Private Sub cmdMax_Click() Dim a As Integer, i As Integer, max As Integer Randomize a = Int(Rnd * 100) + 1 = a max = a For i = 1 To 9 重復執(zhí)行 9次 a = Int(Rnd * 100) + 1 = amp。 , amp。 a If a max Then max = a End If Next i = max End Sub 求 1000個數中的最大 ? 程序代碼 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ?常用于執(zhí)行條件明確，但事前 不知道循環(huán)次數 的循環(huán) ?語法格式 Do While 循環(huán)條件 循環(huán)體語句 Loop ?執(zhí)行流程 Do While Loop語句 條件判斷 循環(huán)體語句 Yes No 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ?通常情況下，在進入 Do While Loop語句前 應給循環(huán)變量設置初值 ?循環(huán)體中必須包含 使循環(huán)趨于結束 的語句 ?可以使用 Exit Do 語句隨時跳出當前所在的循環(huán)，提前結束循環(huán)語句 ?Exit Do 可出現在循環(huán)體語句中的任意位置，通常與 If 語句聯(lián)合使用 Do While Loop語句 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ?語法格式 Do 循環(huán)體語句 Loop While 循環(huán)條件 ?執(zhí)行流程 Do Loop While語句 條件判斷 循環(huán)體語句 Yes No 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 【 實例 】 輸入若干成績（輸入 1時結束）計算總成績和平均成績 。 連續(xù)彈出輸入框接收成績，直至 1時結束 計算總成績和平均成績 多行文本框 Lblaverage Lblsum txtscore 第一章 第二章 第三章 第四章 第五章 第六章 第七章 第八章 第九章 第十章 第十一章 第四章 VB程序設計 ?輸入第 1個數據 ? 輸入第一個數據 ， 存放在變量 score中 ?
教學課件相關推薦
鄂ICP備17016276號-1