2. 计算机
  3. 使用窗体的Click事件在窗体输出1～1000之间能同时被5和7整除的整数，如图所示， 请填空 Private Sub Form_Click() Dim i As Integer Dim Sum As Integer

使用窗体的Click事件在窗体输出1～1000之间能同时被5和7整除的整数，如图所示， 请填空 Private Sub Form_Click() Dim i As Integer Dim Sum As Integer

admin2013-03-30  37
问题 使用窗体的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
选项
答案i Mod 5=0 And i Mod 7=0
解析 Mod()函数的功能是求余，题目要求计算能同时被 5以及7整除的数，使用i Mod 5=O And i Mod 7=0可以实现。
转载请注明原文地址:https://jikaoti.com/ti/DFw0FFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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