首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下程序: Private Sub Form Click() Dim N As Intege,J As Integer N=0 J=1 Do Until N>2 N=N+1:J=J+N*fN+1) Loop Print N:J End
假定有如下程序: Private Sub Form Click() Dim N As Intege,J As Integer N=0 J=1 Do Until N>2 N=N+1:J=J+N*fN+1) Loop Print N:J End
admin
2019-04-29
44
问题
假定有如下程序:
Private Sub Form Click()
Dim N As Intege,J As Integer
N=0 J=1
Do Until N>2
N=N+1:J=J+N*fN+1)
Loop
Print N:J
End Sub
运行程序,单击窗体,输出结果是
选项
A、3 21
B、3 7
C、0 1
D、3 13
答案
A
解析
Do循环语句的功能是:当指定的“循环条件”为真或直到指定的“循环条件”变为真之前重复执行循环体。Do While|Until…Loop循环是在条件满足的情况下才执行一次循环体,而Do…Loop While|Until循环不管是否满足条件都先执行一次循环体,然后再判断条件是否成立以决定后续操作。本题的循环共执行3次,跳出循环时N的值为3,J的值为21。
转载请注明原文地址:https://kaotiyun.com/show/JLUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubFormClick(1)DimiAsInteger,sumAsIntegersum=0Fori=2To10IfiMod2◇0AndiMod
下面有关标准模块的叙述中,错误的是()。
语句PrintSgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Ch1的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“缩小
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个名称为CmdChange、标题为“改变颜色”的命令按钮,窗体标题为“设置窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(
当用()方式打开文件时,如果对文件进行写操作,则写入的数据附加到原文件的后面。
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。
下列说法中错误的是()。
随机试题
案例:甲某是某中级人民法院的前院长,2017年离任后,受聘于某律师事务所。2018年甲某代理了乙某杀人案中犯罪嫌疑人乙某的辩护律师。为保障案件的胜算率,甲某利用其原中级人民法院院长的身份,私下会见了该案的主审法官丙某,要求丙某在审理该案时对其当事人给予额
《桃花源记》的作者是()
主要成分为鞣质的中药材有
基金份额持有人的信息披露义务主要体现与()相关的披露义务。
下列各项中,属于企业筹资管理应当遵循的原则有()。
浙江嘉诺铜业股份有限公司计划2015年5月在主板首次公开发行股票并上市。根据证券法律制度的规定,下列各项中,符合公司在主板和中小板首次公开发行股票并上市条件的有()。
简述运动前进行准备活动的生理作用。
(一)给定材料1.大型纪录片《记住乡愁》第一季以“一村一主题”的方式讲述有关家国情怀的中国乡村故事,诗意回望美好家园,深情展现传统文化,为中国传统村落及其文化的保护、传承和发展注人了正能量。“留住乡愁”已经成为现代社会中的一种精神需求。2.在M村当了好
A、10B、11C、12D、-12E、-11B
计算,其中L是由曲线x2+y2=2y,x2+y2=4y,所围成的区域的边界,按顺时针方向.
最新回复
(
0
)