填空题

下面程序的功能是单击窗体时在消息框中输出1000以内能同时被3、5和7整除的整数。请在‘空白处填入适当语句将程序补充完整。 Private Sub Form_Click() sum＝0 For i＝1 To 1000 If______Then sum＝sum+i End If Next i MsgBox sum End Sub

【参考答案】

I Mod 3＝0 And i Mod 5＝0And i Mod 7＝0
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()Dim i As Integer，x As IntegerFor i＝1 To 6If i＝1 Then x＝iIf i＜＝4 Thenx＝x+1Elsex＝x+2End IfNext iMsgBox XEnd Sub程序运行后，单击命令按钮，其输出结果为______。
填空题
在窗体上画一个命令按钮，其名称为Command1，然后编写如卞程序：Private Sub Command1-Click()Dim a(10) As IntegerDim x As IntegerFor i＝1 To 10a(i)＝iNext ix＝1MsgBox a(f(x)+x)End SubFunction f(y As Integer)y＝y+2f＝yEnd Function程序运行后，单击命令按钮，消息框的输出结果为______。
相关试题