首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序代码: Private Sub Command1_Click() Dim t As Integer Dim n As Integer,x As Integer t=0 For n=1 To 12
编写如下程序代码: Private Sub Command1_Click() Dim t As Integer Dim n As Integer,x As Integer t=0 For n=1 To 12
admin
2020-07-22
19
问题
编写如下程序代码:
Private Sub Command1_Click()
Dim t As Integer
Dim n As Integer,x As Integer
t=0
For n=1 To 12
x=2*n-1
If x/3=x 3 Then t=t+1
Next
Print t
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、5
B、3
C、2
D、4
答案
D
解析
本题考查For循环控制结构及if语句的使用,程序开始时,定义3个整型变量t、n和x。For循环结构中循环变量n的初始值为1,终止值为12,条件判断语句if的功能是判断变量x的值是否能被3整除,若x能被3整除,则将变量t加1,循环执行过程中个变量的值如下:
当n=1时,x=2*1-1=1,条件判断语句if x/3=x\3为假;
当n=2时,x=2*2-1=3,条件判断语句if x/3=x\3为真,执行t=t+1=1;
当n=3时,x=2*3-1=5,条件判断语句if x/3=x\3为假;
当n=4时,x=2*4-1=7,条件判断语句if x/3=x\3为假;
当n=5时,x=2*5-1=9,条件判断语句ifx/3=x\3为真,执行t=t+1=2;
当n=6时,x=2*6-1=11,条件判断语句if x/3=x\3为假;
当n=7时,x=2*7-1=13,条件判断语句if x/3=x\3为假;
当n=8时,x=2*8-1=15,条件判断语句if x/3=x\3为真,执行t=t+1=3;
当n=9时,x=2*9-1=17,条件判断语句if x/3=x\3为假;
当n=10时,x=2*10-1=19,条件判断语句if x/3=x\3为假;
当n=11时,x=2*11-1=21,条件判断语句if x/3=x\3为真,执行t=t+1=4;
当n=12时,x=2*12-1=23,条件判断语句if x/3=x\3为假;
当n=13时,循环结束,最终t的值为4,故D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/m8Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为”排序”的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3-29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3-29(b)所示。
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
假定Picturel和Textl分别为图片框和文本框的名称,则下列错误的语句是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAs
(1)在考生文件夹下有一个工程文件sjt3.vbp,在程序运行时,单击“输入整数”按钮,可以从键盘输入一个整数,并在窗体上显示此整数的所有不同因子和因子个数。如图3.158(a)是输入53后的结果,如图3.158(b)是输入100的结果。已经给出了全部控件
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerStaticzAsIntegerx
在某个事件过程中定义的变量是( )。
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是( )。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
随机试题
北京政府恢复的传统刑罚有()。
Lazinessisasin,everyoneknowsthat.Wehaveprobablyallhadlecturespointingourthatlazinessisimmoral,thatitiswast
A、等容收缩期B、等容舒张期C、快速充盈期D、减慢射血期E、快速射血期大部分血液进入心室是在
使君子宜于驱杀
A、涂3%醋酸后色变白,边界清楚,无血管显示B、表面粗糙稍隆起,无血管显示C、涂3%醋酸后色变白,边界清楚,表面光,有极细红点D、涂3%醋酸后色变白,如红色细线镶嵌的花纹E、血管口径、大小、形态、分支及排列极不规则点状结构()
患者,男,30岁。金属全冠粘固1周后脱落。咬合时常有瞬间性疼痛。口腔检查见患者咬合紧,牙冠短,对颌牙面有银汞合金充填物,脱落的全冠完整。铸造金属全冠的修复体设计,可不考虑的因素是
我国《刑法》规定,凡在我国领域内犯罪的,除法律有特别规定的以外,一律适用我国《刑法》。这一条文规定了()。
下列关于山东戏曲说法正确的是()。
细分市场是指根据地理因素、人口因素、心理因素和行为因素等划分某一产品的市场之后形成的市场。细分市场定价是指针对同一商品或者服务,在不同的细分市场上定以不同的价格。 根据上述定义,下列属于市场细分定价的是:
经全国人大及其常委会授权,国务院有制定税法实施细则、增减税目和调整税率的权力。()
最新回复
(
0
)