使用窗体的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"Sum="&Sum

End Sub

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

参考答案

您可能感兴趣的试题

在窗体上画一个命令按钮，然后编写如下事件过程： PrivateSubCommand1_Click（） DimmAsInte

答案解析
在窗体上画一个命令按钮，然后编写如下事件过程： PrivateSubCommand1_Click（） x=0 DoUnt

答案解析
在窗体上画一个命令按钮，然后写出如下事件过程： PrivateSubCommand1_Click（） s=1 Do s=

答案解析
在窗体上画一个命令按钮，然后编写如下事件过程： PrivateSubCommand1_Click（） s=1 Do s=

答案解析
在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubcommand1_click（)DimaAsString,b

答案解析
执行以下程序,在窗体上输出（)。Private Sub Command1_Click（)Dim a（20)As IntegerFor j = 1 T

答案解析

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