basic的流程控制-文庫(kù)吧資料
2025-04-13 05:10本頁(yè)面
【正文】 E”Print “A”Print “B”Print “C”Print “D”Print “E”Endif endsub多路分支：子項(xiàng)目（2）ELSEIS=60Dim grade Single,Result As Stringgrade=Val(InputBox(請(qǐng)輸入學(xué)生的分?jǐn)?shù)：, 學(xué)生成績(jī)輸入))IS=70IS=80NIS=90NNresult=”A”result=”B”result=”C”result=”D”result=”E”MSGBOXendsubENDSELECT六、應(yīng)用實(shí)例（課堂練習(xí)）：任意輸入三個(gè)數(shù)，判斷其大小并輸出其最大值。LOOP當(dāng)型循環(huán)條件前置Private Sub Command1_Click()Dim n, sum As Integern = 0sum = 0Do While n 100sum = sum + nn = n + 1LoopPrint sumEnd Sub當(dāng)型循環(huán)條件后置Private Sub Command1_Click()Dim n, sum As Integern = 0sum = 0Dosum = sum + nn = n + 1Loop While n 100Print sumEnd Sub直到循環(huán)條件前置Private Sub Command1_Click()Dim sum, s As Longs = 0sum = 0Do Until n 100sum = sum + nn = n + 1LoopPrint sumEnd Sub直到循環(huán)條件后置Private Sub Command1_Click()Dim sum, s As Longs = 0sum = 0Dosum = sum + nn = n + 1Loop Until n 100Print sumEnd Sub要求畫出上述代碼的流程圖，并說(shuō)明該
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1