首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1 Click() Dim mAs Integer,nAs Integer m=1:n=0 Do While m
编写如下程序: Private Sub Command 1 Click() Dim mAs Integer,nAs Integer m=1:n=0 Do While m
admin
2015-05-29
16
问题
编写如下程序:
Private Sub Command 1 Click()
Dim mAs Integer,nAs Integer
m=1:n=0
Do While m<20
n=m+n:m=3*m+1
Loop
Print m,n
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、40 18
B、40 19
C、20 64
D、21 64
答案
A
解析
本题的Do循环是一个先判断条件型的循环,在循环中将循环变量m的值每次改变。分析循环可看出,在4次循环中m的值分别为1、4、13、40,而只有前三次循环中的m值被累加到n中,最后一次循环由于不满足m<20而跳出。
转载请注明原文地址:https://kaotiyun.com/show/SRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:PrivatexAsIntegerPrivateSubCommand1_Click()St
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是
设有一个10个元素的数组,下列程序将该数组的第一个元素与第十个元素交换,第二个元素与第九个元素交换……,第五个元素与第六个元素交换,请补充完该程序。PrivateSubCommnd1_Click()Dima(1
有如下程序,该程序的执行结果是【】。PrivateSubCommand1_lick()Fori=1To4x=4Forj=1To3
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如PrivateSubCommand1_Click()CommonDialogl.Flags=vbOFNHideReadOnl
下面程序运行后的输出结果是PrivateSubCommand1_Click()Forj=1To10IfjMod3<>0Thena=a+j\3NextPrinta
下列程序运行时输出的结果是OptionBase1PrivateSubForm_Click()Dimx(10)AsInteger,y(5)AsIntegerFori=1to10
随机试题
男婴,10天,足月顺产,生后第3天出现皮肤黄疸,近2天食欲减退,黄疸加重。查体:精神萎靡,面色略发灰,前囟平软,心肺无异常,腹稍胀,脐部有少许脓性分泌物,脐轮红。该病最常见的病原菌为
患者,男,60岁。反复中上腹隐痛10年。常发生于餐后半小时,服制酸剂可缓解。近半年疼痛失去规律性,食欲减退,体重减轻。近1周因大便呈灰黑色就诊。查粪便隐血(++~+++),该患者最可能的诊断是()。
非竞争性抑制剂对酶促反应速度的影响是
为乳腺癌根治术后的患者实施的护理措施中,可预防皮下积液及皮瓣坏死的措施是
外键和相应的主键可以不同名,只要定义在相同值域上即可。()
国际社会工作认同的社会工作价值观中“诚信”指的是()。[2009年真题]
尊重学生人格,归根结底在于教职人员应具有良好的()。
卫生部和国家标准化管理委员会发布的新版《献血者健康检查要求》指出:国家提倡献血年龄为()。
Theleadersofthetwocountriesareplanningtheirsummitmeetingwitha______tomaintainanddevelopgoodties.
A.sensibleB.comprehensiveC.readilyD.incaseE.sensitiveF.passingG.sign
最新回复
(
0
)