TA貢獻1836條經(jīng)驗 獲得超5個贊
Private Sub Command1_Click()Dim a As Integer, b As Integer, s As Integers = Max(a, b)MsgBox ("較大的一個數(shù)是:" & s)End Sub'自定義函數(shù)Private Sub Max(a As Integer, b As Integer)If a >= b ThenMax = aElseMax = bEnd IfEnd Sub
舉報
Copyright ? 2025 imooc.com All Rights Reserved | 京ICP備12003892號-11 京公網(wǎng)安備11010802030151號
購課補貼聯(lián)系客服咨詢優(yōu)惠詳情
慕課網(wǎng)APP您的移動學習伙伴
掃描二維碼關(guān)注慕課網(wǎng)微信公眾號