首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
现有以下程序: Private Sub Commandl Click() cl=0 c2=0 For i=l To 100 If i Mod 3=0 Then cl=el+1 Else If i Mo
现有以下程序: Private Sub Commandl Click() cl=0 c2=0 For i=l To 100 If i Mod 3=0 Then cl=el+1 Else If i Mo
admin
2012-12-21
16
问题
现有以下程序:
Private Sub Commandl Click()
cl=0
c2=0
For i=l To 100
If i Mod 3=0 Then
cl=el+1
Else If i Mod 7=0 Then
c2=c2+1
End If
Next i
Print cl+c2
End Sub
此程序运行后输m的是在1~100范围内( )。
选项
A、同时能被3和7整除的整数个数
B、能被3或7整除的整数个数(同时被3和7整除的数只记一次)
C、能被3整除,而不能被7整除的整数个数
D、能被7整除,而不能被3整除的整数个数
答案
B
解析
i是1到100的循环,在程序中,对3和7取模.显然就是3和7的倍数关系。需要注意的是If和else语句分别判断3和7的倍数而同时是21倍数的时候会不计,这有别于传统的计数方法。
转载请注明原文地址:https://kaotiyun.com/show/YNhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下:PrivateSubCommand1_Click()Dim
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:DimSWAsBooleanFunctionfunc(XAsInteger)AsIntegerIfX<20The
执行以下程序段 DimxAsInteger,iAsInteger x=0 Fori=20To1Step-2 x=x+i\5 Nexti后,x的值为
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是
在窗本上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操
在窗体上画一个文本框,然后编写如下事件过程:PrivateSubForm_Click()x=InputBox(“请输入一个整数”)Printx+Text1.Text
在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会
随机试题
患儿,男,6个月。吐奶拒食、嗜睡2天。查体:面色青灰,前囟紧张,脐部少许脓性分泌物。对该患儿的护理措施哪项错误
A.泻药B.激素C.钡剂D.橘子汁E.氯化镁乳剂可用于中和食管酸性液灼伤的物质是
可以鉴别中枢性面瘫与周围性面瘫的检查是
气味芳香、成分易挥发的药物,其用法是一般需
患者男性,45岁。原有胃溃疡病史15年,近2个月来上腹疼痛的节律性消失,服用制酸剂疗效不佳。为了明确诊断,应采用下列哪一项最有价值的检查
某企业采用年度计划分配率法核算制造费用,2009年度制造费用年度计划分配率为每小时18.5元。2009年4月1日企业“制造费用”科目借方余额为3600元,当月实际发生制造费用96800元,产品生产的定额工时5400小时。则,企业4月末企业“制造费用”科目余
O’Neillwasoneofthemostfamousadvocatesofawayofwritingcalled"naturalism."Thisinvolvedbothatechniqueandawayo
Geographyisthestudyoftherelationshipbetweenpeopleandtheland.Geographerscompareandcontrast(1)_____placesonthee
HowcouldPalestiniansgetthesegreenhouses?
DisneyWorld:CitiesofSimulationasPostmodernUtopias(乌托邦)WhatistheessenceofDisneyWorld?Muchofitrevolvesarou
最新回复
(
0
)