首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer Dim n As Integer, s As Integer a = 1
编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer Dim n As Integer, s As Integer a = 1
admin
2015-10-23
58
问题
编写如下程序:
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
Dim n As Integer, s As Integer
a = 1
While a <= 3
For b = 1 To a
For c = b To 3
s = s + 1
Next c
n = n + 1
Next b
a = a + 1
Wend
Print n; s
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、3 14
B、6 14
C、3 9
D、6 9
答案
B
解析
程序中的s和n分别记录了最内层循环的程序执行次数和次内层循环的程序执行次数。当a=1时,进入For循环,最内层循环的程序执行3次,次内层循环的程序执行一次,s=1+1+1=3,n=1;当a=2时,进入For循环,最内层循环的程序执行3+2次即5次,次内层循环的程序执行2次,s=3+1+1+1+1+1=8,n=2;当a=1时,进入For循环,最内层循环的程序执行3+2+1次即6次,次内层循环的程序执行3次,s=8+1+1+1+1+1+1=14,n=3;故s=3+5+6=14,n=1+2+3=6。选择B项。
转载请注明原文地址:https://kaotiyun.com/show/gHLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在对象的MouseDown和MouseUp事件过程中,参数Button的值为1、2、4时,分别代表按下鼠标的左键、[5]和[6]按钮。
表达式x=Sqr(a^2-5)+sqr(b^2-5)的类型是
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
下列叙述中,不符合良好程序设计风格要求的是
在VisualBasic的立即窗口内输入以下语句X=97?Chr$(X)在窗口中显示的结果是【】。
为了选择多个控件,可以按住______键,然后单击每个控件。
按"先进后出"原则组织数据的数据结构是【】。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为
下列不属于软件工程的3个要素的是
软件危机出现于20世纪60年代末,为了解决软件危机,人们提出了_______________的原理来设计软件,这就是软件工程诞生的基础。
随机试题
莱茵-埃农氏法测定乳制品中蔗糖的原理:试样经除去蛋白质后,其中蔗糖经()水解为还原糖,再按还原糖测定;水解前后的差值乘以相应的系数即为蔗糖含量。
经过点(1,0),且切线斜率为3x2的曲线方程是()
Sportshavealwaysbeenruledbytheweather.Rain,sleet,snowandcoldcalledtheplays.Baseballfanshaveoftensatinther
若企业的记账本位币选择的是人民币以外的币种,编报的财务报表应当折算为人民币。()
根据劳动合同法律制度的规定,下列各项中,不属于劳动合同终止情形的是()。(2014年)
(1)A公司的财务报表资料如下:(2)A公司2011年的相关指标如下表。表中各项指标是根据当年资产负债表中有关项目的期末数与利润表中有关项目的当期数计算的。(3)计算财务比率时假设:“货币资金”全部为金融资产,“应收票据”、“应收账款”、“其他应
某公司的会计人员甲伪造会计账簿,尚不构成犯罪。根据《会计法》的规定,甲的违法行为的法律后果是()。
袁世凯篡夺了辛亥革命果实的标志是()。
关于函数参数的叙述中正确的是()。
A、Allthetattoosaretemporaryandeasilyremovable.B、Temporarytattoosarecheaperthantherealones.C、Mostpeoplewithtat
最新回复
(
0
)