首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim i As Integer.n As Integer For i=l To 20 i=i+4 n=
有如下程序: Private Sub Form_Click() Dim i As Integer.n As Integer For i=l To 20 i=i+4 n=
admin
2013-11-29
29
问题
有如下程序:
Private Sub Form_Click()
Dim i As Integer.n As Integer
For i=l 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=1l时,i=i+4=11+4=15,n=n+i=15+15=30,此时,i=15,i>10成立,退出循环。此时n=30。
转载请注明原文地址:https://kaotiyun.com/show/dHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,名称为Textl,然后编写如下程序:PrivateSubForm_Load()Open”d:\temp\dat.txt”ForOutputAs#1Textl.Text=“”EndSubPrivateSubTex
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
在考生文件夹中有工程文件sj5.vbp及其窗体文件sj5.frm,该程序是不完整的,请在有“?”的地方填入正确内容,然后删除“?”及所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为Forml的窗
在名称为Form1的窗体上有两个命令按钮(名称分别为COmmand1和command2、标题分别为“读取”和“保存”)和一个文本框(名称为Textl、MultiLine属性为True、ScrollBars属性为2)。要求程序运行后,如果单击“读取”按钮,则
(1)在窗体上绘制一个列表框,名称为Listl;一个文本框,名称为Textl;一个命令按钮,名称为C1,标题为“复制”。要求程序运行后,在列表框中自动建立4个列表项,分别为“Iteml”、“Item2”、“Item3”和“Item4”。如果选择列表框中的一
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Commandl,标题为“输出”的命令按钮,编写适当的事件过程。程序运行后,如果单击“输出”按钮,则在Forml窗体上显示
窗体如图所示,其中汽车是名称为Imagel的图像框,命令按钮的名称为Command1,计时器的名称为Timer1,直线的名称为Linel。程序运行时,单击命令按钮,则汽车每0.1秒向左移动100,车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序
下列关于栈的叙述中正确的是______。
在数据库管理系统提供的数据语言中,负责数据的查询及增、删、改等操作的是
随机试题
设总体X的概率分布为利用来自总体的样本值1,3,2,2,1,3,1,2,可得θ的最大似然估计值为().
蔡元培率先引入中国的一词是()
Don’tloseheart!Youshould______yourcourageandovercomethedifficulty.
启动外源性凝血途径的物质是()
根据新的《中华人民共和国公司法》的规定,监事会、不设监事会的公司监事行使的职权不包括()。
账簿中书写的文字和数字上面要留有适当空间,不要写满格,一般应占格距的三分之一。()
造就全面发展的人的途径和方法是()
公有制经济包括国有经济和集体经济。()
出个门,还要如此这般__________,不明__________的人,恐怕要笑话了。然而这风格放在梁在秀身上,却也正是人事相宜。搞了大半辈子形而上的哲学,所奉守的,不外“真我”二字。他既要真我无亏,行起事儿来,一举一动便都不能__________。填入划
试述新航路开辟的历史背景及影响。(南京大学1998年世界古代中世纪史真题)
最新回复
(
0
)