作业帮 > 综合 > 作业

VB求100到200之间所有可以被3整除的数的总和?

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/09 12:13:43
VB求100到200之间所有可以被3整除的数的总和?
新建工程,在窗体上添加一个文本框和一个命令按钮,设置命令按钮标题为“计算”.程序运行后,要求单击“计算”按钮时求出100到200之间所有可以被三整除的数的总和,并在文本框中显示出来
Private Sub Command1_Click()
s = 0
For i = 100 To 200
If i Mod 3 = 0 Then
s = s + i
End If
Next i
Text1.Text = s
End Su