首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: 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
35
问题
有如下程序:
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://jikaoti.com/ti/tLN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhlilei<6s=s+i/(i+1):i=i+1LoopPri
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()d=0:c=10:x=Array(10,12,21,32,24)Fori=1To5Ifx(i)>
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10:y=20Callfun1(x,y)Printx;yEndSubPrivateFunctionf
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=Val(InputBox("输入整数"))y=Val
对于文本框Text1,能够获得按键的ASCII码值的事件过程是
以下关于键盘事件的叙述中,错误的是
设有如下数组定义语句:Dima(-1To4,3)AsInteger以下叙述中正确的是
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
以下关于变量作用域的叙述中错误的是
以下说法中正确的是
随机试题
A、氢化可的松B、甲泼尼龙C、地塞米松D、促皮质素E、美替拉酮短效糖皮质激素是
当用户程序占用中央处理器时,应让中央处理器
血红蛋白尿见于
A.急性肾炎B.急进性肾炎C.慢性肾炎D.隐匿性肾炎E.肾病综合征女性,43岁,体检发现镜下血尿及尿蛋白(+)。血压125/80mmHg,血肌酐89μmol/L。诊断为
建设项目财务内部控制的具体控制目标不包括( )。
某承包商对一项10000延长米的不锈钢栏杆装修工程进行承包,报价书中指明:计划用工11500工日,即工效为11500工日/10000m=1.15工日/m,29元/工日,人工费共计报价人民币333500元。在施工过程中,由于业主供应材料不及时,影响了承包商的
下列各项中,既属于费用要素又属于损益类科目的是()。
占整个电信业务收入比重最大的业务在2002年上半年中与去年同期相比变化情况是( )农村固定电话用户数比上年来增长了( )
辩论吸烟问题时,正方认为:吸烟有利于减肥,因为戒烟后人们往往比戒烟前体重增加。反方驳斥道:吸烟不能导致减肥,因为吸烟的人常常在情绪紧张时试图通过吸烟缓解,但不可能从根本上消除紧张情绪,而紧张情绪导致身体消瘦。戒烟后人们可以通过其他更有效的方法消除紧张的情绪
以往,境内企业进出口只能以美元或第三方货币结算,在合同签约至合同执行完毕期间汇率的变化会使企业的实际赢利出现波动。现在银行推出了人民币结算业务。由于人民币是境内企业的本币,合同计价和企业运营的主要货币相一致,境内企业在合同签订前能够切实了解交易的成本和收入
最新回复
(
0
)