求VB编程：输出100~200间所有不能被3整除的数并求和。

2024-10-28 08:35:38

推荐回答（1个）

回答（1）：

Private Sub Command1_Click()
For i = 100 To 200
If i Mod 3 <> 0 Then
s = s + i
Print i;
n = n + 1
If n Mod 10 = 0 Then Print
End If
Next
Print
Print "100~200间所有不能被3整除的数的和="; s
End Sub

最新问答

已输入10张现金付款凭证，若删除其中第6张凭证，则再次输入的现金付款凭证编号应为什么？

大家看看则个户型图怎么样? 还有消防连廊的问题

简述指针式万用表与数字式万用表的区别。

如果你发现有迹象你老公和他的同事不太正常，这时候你会怎么做？正好你和老公的关系这段也有点紧张（前几

天地之门1里在栅栏和门里面的宝箱怎么拿阿？

求VB编程 ：输出100~200间所有不能被3整除的数并求和。

求VB编程：输出100~200间所有不能被3整除的数并求和。