编程计算100—200之间7的倍数之和

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/10 14:18:46
编程计算100—200之间7的倍数之和

编程计算100—200之间7的倍数之和
编程计算100—200之间7的倍数之和

编程计算100—200之间7的倍数之和
Private Sub Command1_Click()
Dim sum,i As Integer
sum = 0
For i = 100 To 200
If i Mod 7 = 0 Then
sum = sum + i
End If
Next
MsgBox "和为:" & sum
End Sub