首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Private Sub Command1_Click() For i=3 To 1 Step-1 Sum=0 For j=1 To i Sum=Sum+i*j Next Next Prin
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Private Sub Command1_Click() For i=3 To 1 Step-1 Sum=0 For j=1 To i Sum=Sum+i*j Next Next Prin
admin
2020-04-18
1
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Private Sub Command1_Click()
For i=3 To 1 Step-1
Sum=0
For j=1 To i
Sum=Sum+i*j
Next
Next
Print Sum
End Sub
运行程序时,单击命令按钮,则窗体上显示的是
选项
A、1
B、6
C、18
D、25
答案
A
解析
本题是一个简单的二重循环,只要注意到i的值逐渐递减,而且在内循环执行之前都会重新将Sum的值设置为0,不难得出只会输出最后一次外循环的Sum值,由于此时i=1,所以内循环只会执行一次,最终输出1作为结果。
转载请注明原文地址:https://kaotiyun.com/show/KfTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下事件过程:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInterger,XAsSingle,YAsSingle)If(ButtonAnd3)=3ThenPrint“
设子程序过程定义的首部为:PublicSubS(XAsInteger,YAsSingle)则以下正确的调用形式为
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) Fori=1Ton Dec=Dec*2+
下列链表中,其逻辑结构属于非线性结构的是
下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
软件需求规格说明书的作用不包括
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
设在工程文件中有一个标准模块,其中定义了如下记录类型TypeBooks NameAsString*10 TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
下面关于数组声明:Dimarr()AsInteger的叙述中正确的是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为()。
随机试题
将信息分为战略性信息、管理性信息、业务性信息是按建设工程项目的( )进行分类的。
有抗震设防要求时,填充墙与框架之间宜采用()的方法。
净资产收益率越高,表明企业自有资本获取收益的能力越强。()
自2012年初以来,A公司出现不能清偿到期债务,且资产不足清偿全部债务的情况。2012年12月17日,人民法院经审查裁定受理了A公司的破产申请,并指定了管理人。在该破产案件中,存在下述情况:(1)2011年10月8日,B公司向C银行借款1000万元,期限
导游员小王利用工作之便,擅自从事文物商业经营活动,尚不构成犯罪。对此行为,根据《文物保护法》规定,由()予以处罚。
电灯:照明正确选项为()。
张居正执政时期,调抗倭名将_________北上守蓟门,任用杰出的治河专家_________治理黄河、淮河。针对赋役制度存在的弊端,张居正还主持推广了以_________为中心的改革。
当x∈[3,8]时,|x-2|+|x-5|+|x-7|的最大值为m,最小值为n,则=().
设在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有代码:PublicaAsInteger:Priv
Whenimaginativescientistsfirstsuggestedthepossibilitythatonepersoncouldspeakdirectlytoanotheroveralongdistanc
最新回复
(
0
)