2. 计算机
  3. 下列程序的功能是单击窗体时在消息框中输出1000以内能同时被3、5和7整除的整数，请补充完整此程序： Private Sub Form_Click() sum＝0 For i＝1 To 1000 If______Then sum＝sum+I End If

下列程序的功能是单击窗体时在消息框中输出1000以内能同时被3、5和7整除的整数，请补充完整此程序： Private Sub Form_Click() sum＝0 For i＝1 To 1000 If______Then sum＝sum+I End If

admin2010-07-10  57
问题 下列程序的功能是单击窗体时在消息框中输出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＝0 And i Mod 7＝0
解析  本题考查VBA中书写条件表达式的知识。本题需要补充完整的空白处恰好就是这个程序的关键所在，也就是如何判断i能同时被3、5和7整除。判断整除我们一般使用两个数相除求余数，然后通过判断余数是否为0来实现。由于需要同时被3、5和7整除，所以3个判断的表达式之间应该是“与”的关系，最终结果为i Mod 3＝0 And i Mod 5＝0 And i Mod 7＝0。
转载请注明原文地址:https://www.kaotiyun.com/show/KEup777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)