首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序的功能是单击窗体时在消息框中输出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
admin
2010-07-10
32
问题
下列程序的功能是单击窗体时在消息框中输出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://kaotiyun.com/show/KEup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
要建立文件流并打开当前目录下的文件file.dat用于输入,下列语句中错误的是()。
下面选项中不是关系数据库基本特征的是()。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
使用Ve6打开考生文件夹proj2下的工程proj2。其中在编辑窗口内显示的主程序文件中定义有类XBase和XDerived,以及主函数main。程序文本中位于每行”//************found************下面的一行内有一处或多处下划
若MyClass是一个类名,其有如下语句序列:MyClassc1,*c2;MyClass*c3=newMyClass;MyClass&c4=c1:上面的语句序列所定义的类对象的个数是()。
使用VC6打开考生文件夹proj1下的工程proj1,其中定义了一个CD类。程序中位于每个//ERROR**********found**********下的语句行有错误,请加以更正,不得修改程序的其他部分。更正后程序的输出应该是:歌唱祖国30
将E-R图转换到关系模式时,实体与联系都可以表示成()。
在进行逻辑设计时,将E-R图中实体之间联系转换为关系数据库的
某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)()。
随机试题
给定资料1.“以前没有独立的执法权,需要由授权部门进行审核并批准后才能进行处理,时间跨度相对较长。”M县综合行政执法大队大队长说,现在执法队伍发现问题后,由本单位按程序进行审批就可以立案查处,简便高效。变化来自2020年6月,M县获批开展
做新时期忠诚坚定的爱国者,除了需要培育爱国情感,保持民族自尊、自信和自强,树立爱国思想,增进国家团结、统一和安全外,还需要【】
全血或红细胞通常保存的温度范围是
建设工程监理制是实行( )的基本保障。
背景资料:某安装公司承接一大型商场的空调工程。工程内容有:空调风管、空调供回水,开式冷却水等系统的钢制管道与设备施工,管材及配件由安装公司采购。设备有:离心式双工况冷水机组2台,螺杆式基载冷水机组2台,24台内融冰钢制蓄冰盘管,146台组合式新风
根据《建筑安装工程费用项目组成》(建标[2003]206号),规费包括()。
我国保险法规定,设立地方性保险公司其资本金不得低于()人民币。
公安机关是人民民主专政的重要工具,这是公安机关的阶级属性,但不是它的根本属性。()
Canadianpoliceand【D1】______teamswereworkingTuesdayafternoonto【D2】______about300peoplestrandedafterwhatalocaloffic
A、Theycan’tdecidewhichmovietowatch.B、Susan’smotherisgoingtouseit.C、Susan’smotherisgoingtoaskhertodosometh
最新回复
(
0
)