vf计算1~100所有能被3或4整除的数的和

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 09:03:33
vf计算1~100所有能被3或4整除的数的和

vf计算1~100所有能被3或4整除的数的和
vf计算1~100所有能被3或4整除的数的和

vf计算1~100所有能被3或4整除的数的和
Private Sub Command1_Click()
Dim i As Integer,s As Long
For i = 1 To 100
If i Mod 3 = 0 Or i Mod 4 = 0 Then
s = s + i
End If
Next i
Print s
End Sub