vb 程序:计算1-100之间所有能被3整除的数之和

2025-03-25 01:53:56
推荐回答(1个)
回答1:

Sub s()
    For i = 1 To 100
        If i Mod 3 = 0 Then sm = sm + i
    Next
    MsgBox sm
End Sub