使用窗体的Click事件在窗体输出1~1000之间能同时被5和7整除的整数 如图所示 请填空Private Sub F

使用窗体的Click事件在窗体输出1～1000之间能同时被5和7整除的整数，如图所示，

请填空

Private Sub Form_Click()

Dim i As Integer

Dim Sum As Integer

Cls

For i=1 To 1000

If 【 】 Then

Sum=Sum+i

Printi

End If

Next i

Print

Print"Sum="&Sum

End Sub

请帮忙给出正确答案和分析，谢谢！