求100到200之间能被3和5整除的所有数之和求vb程序

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/15 06:47:35
求100到200之间能被3和5整除的所有数之和求vb程序求100到200之间能被3和5整除的所有数之和求vb程序求100到200之间能被3和5整除的所有数之和求vb程序105+120+135+150+

求100到200之间能被3和5整除的所有数之和求vb程序
求100到200之间能被3和5整除的所有数之和
求vb程序

求100到200之间能被3和5整除的所有数之和求vb程序
105+120+135+150+165+180+195=1050

Private Sub main()
MsgBox "100到200之间能被3和5整除的所有数之和为: " & sum
End Sub
Function Form_Load()
s = 0
For i = 100 To 200
If (i Mod 5 = 0) Or (i Mod 3 = 0) Then s = s + i
Next
sum = s
End Function