VB程序,在窗体上输入100-200之间所有合数,求所有数之和...

2020-04-22 教育 284阅读
Private Sub Form_Click()
For i = 100 To 200
For b = 2 To i - 1
If i Mod b = 0 Then
Sum = Sum + i
Print i
Exit For
End If
Next b
Next i
MsgBox Sum
End Sub
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com