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

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/07 18:05:46

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

求VB编程 :输出100~200间所有不能被3整除的数并求和.
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