首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下程序: Private Sub Form_Click() Dim N As Integer,J As Integer N=0 J=1 Do Until N>2 N=N+1 J=J+N*(N+1) Loop Print N:J End Sub 运行
假定有如下程序: Private Sub Form_Click() Dim N As Integer,J As Integer N=0 J=1 Do Until N>2 N=N+1 J=J+N*(N+1) Loop Print N:J End Sub 运行
admin
2016-06-23
65
问题
假定有如下程序:
Private Sub Form_Click()
Dim N As Integer,J As Integer
N=0
J=1
Do Until N>2
N=N+1
J=J+N*(N+1)
Loop
Print N:J
End Sub
运行程序,单击窗体,输出结果是
选项
A、3 21
B、3 7
C、0 1
D、3 13
答案
A
解析
Do Until…Loop语句在条件满足的前提下会一直执行中间的循环语句。N的初值为0,因此循环会执行3次。在循环体内N每次被加1。因此结束时N=3。同样的方法可算出J=21。选A。
转载请注明原文地址:https://kaotiyun.com/show/pSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load() Open"d:\temp\dat.txt"ForOutputAs#1 Text1.Text=""EndSu
要将窗体Form1标题设为“学习VB”,以下能正确实现该功能的语句为
下面有一段程序代码,如果从键盘上输入“Computer”,则在文本框内显示的内容是PrivateSubText1_KeyPress(KeyAsciiAsInteger) IfKeyAscii>=65AndKeyAscii<=
下列事件过程运行后输出结果是PrivateSubCommand1_Click() PrintFormats(123,456,"###,##%")EndSub
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("
能触发滚动条Scorll事件的操作是()。
在运行程序时,在文本框中输入新的内容,或在程序代码中改变Text的属性值,相应会触发到()事件。
下列程序的运行结果是()。s=0:t=0:u=0Forx=1To3Fory=1ToxForz=yTo3 s=s+1Nextzt=t+1Nextyu=u+1
随机试题
作为中国海军博物馆讲解员的小周,接受了制作“辽宁号航空母舰”简介演示幻灯片的任务。请根据考生文件夹下的“辽宁号航空母舰素材.docx”的素材,帮助小周完成制作任务,具体要求如下:演示文稿的最后一页为致谢幻灯片,并包含“谢谢各位”字样。
贺铸因其《青玉案》(凌波不过横塘路)一阋结尾三句“__________”而获得了“__________”的雅号。
关于胎盘的功能,不正确的是
下列哪项不符合"无瘤"外科原则
英国法学家梅特兰评价说:“从未有过如此丰富的一流智慧被投放到一次立法行为当中”,指的是下列哪一部法典?()
当降水深度超过()时,可在管井井点中采用深井泵。
室内消火栓栓口动压大于()MPa时,必须设置减压装置。
买入返售金融资产收入属于()。
铁路运输企业在竞争性领域实行()。
设组合框Combol中有3个项目,则以下能删除最后一项的语句是
最新回复
(
0
)