You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
題目說明:依據體重來判斷男子跆拳道選手的參賽級別;體重介於 59~63(不含)<br />
公斤為輕量級,68~73(不含)公斤為中量級,73~78(含)為重量級<br />
檔案名稱:<strong>03</strong> \ ch5 \ P.145<br />
表單:<br />
程式碼:<br />
Private Sub Form_Activate()<br />
Dim kg As Integer<br />
kg = InputBox("請輸入體重", "體重輸入")<br />
If kg >= 59 And kg < 63 Then<br />
MsgBox "輕量級", , "參賽級別"<br />
Else<br />
If kg >= 63 And kg < 73 Then<br />
MsgBox "中量級", , "參賽級別"<br />
Else<br />
If kg >= 73 Then<br />
MsgBox "重量級", , "參賽級別"<br />
End If<br />
End If<br />
End If<br />
End Sub<br />
執行結果:
Change language