首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: 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-05-08
28
问题
有如下程序:
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/rSGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:其中关系T由关系R和S通过某种操作得到,该操作为
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是
程序调试的任务是
VB中有3个键盘事件:KeyPress、KeyDown、KeyUp,若光标在Textl文本框中,则每输入一个字母()。
在用Open语句打开文件时,如果省略”For方式”,则打开的文件的存取方式是()。
以下能从字符串”VisualBasic”中直接取出子字符串“Basic”的函数是()。
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()x=0doWhilex<50x=(x+2)
窗体上已有1个名称为Picturel的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picturel显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picturel显示在鼠标位置下面不能实现上述任何功能的事件过程是
窗体上有一个Textl文本框,并编写了下面事件过程:PrivateSubTextl_KeyPress(KeyAsciiAsInteger)KeyAscii=KeyAscii+3EndSub程序运行时,在文
在名称为Forml的窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Labell、标题为”文件名”的标签和名称为Label2、BorderStyle为1的标签。窗体的标题设置为”文件系统
随机试题
8个月女孩,发热、腹泻轻咳2天入院,大便10余次/日,蛋花汤样,大便镜检:白细胞2~3个/HP,大便细菌培养阴性,血常规:WBC为5×109/L,除轻度脱水征外,无其他异常。最可能的诊断是
主动脉粥样硬化可导致的致死性病变是
某人研究新生儿黄疸的病因,选择100例确诊的新生儿黄疸病例和同期同医院确诊的没有黄疸的新生儿100例,然后调查产妇的分娩卡片,了解产前及产时各种暴露情况。这种研究方法是
受移送的人民法院认为受移送案件不属于本院管辖的,应( )。
下面表述正确的是()。
某兴趣小组用大豆新鲜绿叶进行如下图所示的实验,将该实验装置置于充足的光照下,则相关说法正确的有()。
如图,AD⊥BC,CE⊥LAB,垂足为D、E,CE、AD交于H,AE=4,EH=EB=3,问CH长为:
2007年全球金融海啸肆虐,以家电为代表的消费性电子产品外销的需求急速衰退,家电企业可谓__________。为了扩大国内市场,也为了让国内家电企业走出低谷,家电下乡、以旧换新、节能补贴等政策陆续出台。这些扶持性政策__________,对家电业发展产生
负强化
Marriageis,formanypeople,theirmostimportantrelationship,thesourceofmuchhappiness,and,forsome,evenaddsextraye
最新回复
(
0
)