首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim i As Integer,n As Integer For i=1To20 i=i+4 n=n+i If>10Then Exit For Next Print n End Sub 程序
有如下程序: Private Sub Form_Click() Dim i As Integer,n As Integer For i=1To20 i=i+4 n=n+i If>10Then Exit For Next Print n End Sub 程序
admin
2018-06-21
22
问题
有如下程序:
Private Sub Form_Click()
Dim i As Integer,n As Integer
For i=1To20
i=i+4
n=n+i
If>10Then 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_O+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/mdGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果把命令按钮的Cancel属性设置为True,则程序运行后()。
在窗体上画1个文本框,名称为Textl(multiline属性为True),然后再添加三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读数”、“统计”和“存盘”,如图所示。程序的功能是:单击“读数”按钮,则把考生文
编写如下程序:PrivateSubForm_Click()Print“Welcome!”EndSubPrivateSubForm_MouseDown(ButtonAsInteger,Shi
已知图片框Picturel中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是()。
以下打开VisualBasic菜单编辑器的操作中,错误的是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为。ForTnl、Form2。其中,Forml上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图l所示)。Form2上有一个,名称为Commandl、标题为“
下列不属于结构化分析的常用工具的是()。
在名称为Framel的框架中,有两个名称分别为opl、op2的单选按钮,标题分别为“单程”、“往返”,如图所示。
要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是()。
随机试题
可行性研究的根本目的是实现项目决策的科学化、民主化,减少或避免投资决策的失误,提高项目开发建设的经济、社会和环境效益。()
当沥青路面面层的厚度大于5cm时,应对路面实测回弹弯沉值的结果进行温度修正,换算成标准温度为20℃时的弯沉值后再进行计算或评定。()
图像校正与信息提取的常用方法中,统计分析是对图像单元的()进行统计分析。
企业每月都应进行一次全面清查。()
在市场准入范围和标准中,不属于中资商业银行行政许可事项的是()。
有一则公益广告劝告人们,酒后不要开车,直到你感到能安全驾驶的时候才开。然而,在医院进行的一项研究中,酒后立即被询问的对象往往低估他们恢复驾驶能力需要的时间,这个结果表明,在驾驶前饮酒的人很难遵循这个广告的劝告。下面哪项如果为真能最有力地支持以上结
俗话说“三个和尚没水喝”,这说明的是人浮于事;但如果“三个和尚”都很负责,结果也许会造成水满为患。这两种不同的说法表明()。
科学管理学派的核心思想是指导人们用科学理性的思维来进行管理,它的奠基人“科学管理之父”泰勒提出要使管理走向科学化。以下哪项不是泰勒的观点?()
在天平上重复称量一重为a的物品.假设各次称量结果相互独立且同服从正态分布N(a,0.22).若以表示n次称量结果的算术平均值,则为使n的最小值不小于自然数___________.
To:AllEmployeesDate:March21stSubject:IntranetDearemployees,Tomanageourinformationwellandimprovethewaywecom
最新回复
(
0
)