basic的流程控制-資料下載頁
2025-04-07 05:10本頁面
【正文】 ult=”C”result=”D”result=”E”Print “A”Print “B”Print “C”Print “D”Print “E”Endif endsub多路分支：子項目（2）ELSEIS=60Dim grade Single,Result As Stringgrade=Val(InputBox(請輸入學(xué)生的分數(shù)：, 學(xué)生成績輸入))IS=70IS=80NIS=90NNresult=”A”result=”B”result=”C”result=”D”result=”E”MSGBOXendsubENDSELECT六、應(yīng)用實例（課堂練習(xí)）：任意輸入三個數(shù)，判斷其大小并輸出其最大值。要求：選畫流程控制圖，后寫代碼。流程控制圖代碼NYYYCLS ‘清屏’定義變量及變量類型輸入要比較的數(shù)?ab?ac?bcMaxnum=bMaxnum=cMaxnum=aNNPrint maxnumEnd subPrivate Sub Command1_Click()Dim a, b, c, maxnum As DoubleClsa = Val(InputBox(please input the first number))b = Val(InputBox(please input the second number))c = Val(InputBox(please input the third number))If a b Then If a c Then maxnum = a Else maxnum = c End IfElse If b c Then maxnum = b Else maxnum = c End IfEnd IfPrint maxnum= amp。 maxnumEnd Sub七、分析：寫代碼應(yīng)可讀、簡短并達到目的為原則。8 / 9
公司管理相關(guān)推薦
鄂ICP備17016276號-1