首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim i As Integer, n As Integer For i=1 To 20 i=i+4 n=n+i If i>10 Then Exit For
有如下程序: Private Sub Form_Click() Dim i As Integer, n As Integer For i=1 To 20 i=i+4 n=n+i If i>10 Then Exit For
admin
2018-12-20
70
问题
有如下程序:
Private Sub Form_Click()
Dim i As Integer, n As Integer
For i=1 To 20
i=i+4
n=n+i
If i>10 Then Exit For
Next
Print n
End Sub
程序运行后,单击窗体,则输出结果是( )。
选项
A、14
B、15
C、29
D、30
答案
D
解析
程序中For循环中的If语句判断循环变量i值如果大于10则退出循环。各次循环变量值变化如下:
i=1时,i=i+4=1+4=5,n=n+i=0+5=5,此时i=5,i>10不成立,i加1转入下次循环。
i=6时,i=i+4=6+4=10,n=n+i=5+10=15,此时,i=10,i>10不成立,i加1转入下次循环。
i=11时,i=i+4=11+4=15,n=n+i=15+15=30,此时,i=15,i>10成立,退出循环。此时n=30。
转载请注明原文地址:https://kaotiyun.com/show/7kFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsInteger DimtAsInteger t=a-b b=t+a
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfunc(LAsLabel) L.Caption="1234"EndSubPrivateSubForm
窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。Option1的单击事件过程如下:PrivateSubOption1_Click() Dimarr arr=Array("
窗体上有一个名称为VScroll1的滚动条,当用鼠标拖动滚动条中的滚动块时,触发的事件是( )。
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是( )。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
编写如下程序:PrivateSubForm_Click() Print"Welcome!"EndSubPrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAs
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
随机试题
柏拉图在《理想国》中要驱除______。()
津液的输布排泄和下列哪项无关
从头合成嘌呤的直接原料是
在社会上,()揭示了城市的内在结构。
对于报关企业,海关要求其在设立时具备()条件。
根据《行政处罚法》、《行政许可法》、《行政强制法》及《税收征收管理法》等法律及行政法理论,下列关于税务机关应当遵守的行政程序基本制度要求的说法中,正确的是()。(2013年)
(2009年)甲研究所与乙公司订立的买卖合同约定:乙公司向甲研究所购买一台具有特定性能的石墨卷材生产设备,总价款300万元;乙公司应于合同签订之日起3日内向甲研究所支付100万元预付款;甲研究所应于2008年11月1日之前交付设备(乙公司自行提货);乙公司
李某杀人潜逃,民警到其老家寻访,其亲属对警察到访非常抗拒,不愿配合。对此,民警对犯罪嫌疑人亲属做工作时的做法错误的是()。
结合材料回答问题:材料1全会提出,发展社会主义民主政治,必须以保证人民当家作主为根本,坚持和完善人民代表大会制度、中国共产党领导的多党合作和政治协商制度、民族区域自治制度以及基层群众自治制度,更加注重健全民主制度、丰富民主形式,充分发挥
要将E盘中当前正在编辑的Word1.doc文档复制到U盘中,应当使用(48)。
最新回复
(
0
)