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

爱上哭泣的沙漠 1年前 已收到1个回答 举报

sgjxc333 幼苗

共回答了17个问题采纳率:100% 举报

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 Su

1年前

2
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.506 s. - webmaster@yulucn.com