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

发布时间：2021-03-07 23:07:16

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

网友回答

Sub a()
i = 1j = 1s = 0For i = 1 To 100 Step 1
If i Mod 3 = 0 Or i Mod 5 = 0 Then
Cells(j + 1,1) = i
s = s + ij = j + 1End IfNext iCells(1,1) = 1~100以内能被3或5整除的数之和等于 & s
End Sub
以上问题属网友观点，不代表本站立场，仅供参考！