计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数求这个VB的编码,特别是求和部分,急求

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 07:13:11
计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数求这个VB的编码,特别是求和部分,急求

计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数求这个VB的编码,特别是求和部分,急求
计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数
求这个VB的编码,特别是求和部分,急求

计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数求这个VB的编码,特别是求和部分,急求
Sub a()
i = 1
j = 1
s = 0
For i = 1 To 100 Step 1
If i Mod 3 = 0 Or i Mod 5 = 0 Then
Cells(j + 1,1) = i
s = s + i
j = j + 1
End If
Next i
Cells(1,1) = "1~100以内能被3或5整除的数之和等于" & s
End Sub