首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer,sum As Integer n=1 Do j=1 Do sum=sum+j:j=j+1Print j; Loop Unti
有如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer,sum As Integer n=1 Do j=1 Do sum=sum+j:j=j+1Print j; Loop Unti
admin
2019-06-11
33
问题
有如下程序:
Private Sub Command1_Click()
Dim i As Integer,j As Integer,sum As Integer
n=1
Do j=1
Do
sum=sum+j:j=j+1Print j;
Loop Until j>3
n=n+2
Loop Until n>10
Print sum
End Subs
运行上述程序,外层Do循环执行的次数为
选项
A、4
B、5
C、7
D、10
答案
B
解析
外循环的控制条件为n>10,即n>10的时候结束循环:在每次内循环中j都会自加,j>3的时候退出内循环,即每次外循环中内循环都会执行3次;由于内循环没有改变n的值,而在外循环中n的值自加2,所以外循环共循环5次。
转载请注明原文地址:https://kaotiyun.com/show/AVUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=1To4Forj=1To4a(i,j)=(i-1)*3+jNext
文本框的Locked属性被设置为True后产生的效果是
设工程中有Form1、Form2两个窗体,要求单击Form2上的Command1命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:PrivateSubCommand1_Click()Staticaa=1:b=2:c=3Callf(a,b,c)Printa;b;CEndSubSubf(ByVal
某人为计算n!(0<n<=12)编写了下面的函数过程:PrivateFunctionfun(nAsInteger)AsLongDimpAsLongp=1Fork=n-1To2Step-1p=p*kNextkfun=pEn
设有下面的语句:PrintIIf(x>0,1,IIf(x<0,-1,0))与此语句输出结果不同的程序段是
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为
随机试题
Goinghungryisamajorcontributortoillhealth,particularlyamongchildren,andanewreportrevealshowlong-lastingtheda
根据五行生克乘侮规律来推断疾病的转归,下列为“顺”的有
关于甲状旁腺素(PTH)下述哪项是正确的
小儿惊厥最常见的类型是
根据《中华人民共和国防洪法》规定,工程设施建设严重影响防洪,逾期不拆除的,行政主管部门强行拆除,所需费用由建设单位承担。行政机关的这种做法属于下列哪个选项的行为?()
在经过一段急速的发展后,三维动画技术在最近两年进入一个_______期。不是因为技术本身无法再_______,而是技术前进的脚步太快,人们需要停下来思考一下应该如何_______这些技术。依次填入划横线部分最恰当的一项是()。
设χ是参数为n=4和P=0.5的二项随机变量,则P(X<2)为()。
所谓“无头案”,是指难以确定犯罪嫌疑人的刑事案件。侦破“无头案”,首先要确定犯罪嫌疑人。任何刑事案件,作案者总会留下破案线索,其中,包括带有个人特点的作案方式和作案手段,如手段特别残忍、选择闹市作案、专门针对年轻女性等。惯犯在作案方式和手段上都带有明显的个
Itisan______whichmaybebrown,greenorblackincolour.
A、Ajoblisting.B、Apersonalresume.C、Apermissionslip.D、Asalaryrequirement.B录音中提醒学生咨询时besuretobringaresume“一定要带上自己的
最新回复
(
0
)