首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim i As Integer,a(10)As Integer Dim p(3)A sInteger k=5 For i=0 To 10 a(i)=i Next i For i=0 To 2
有如下程序: Private Sub Form_Click() Dim i As Integer,a(10)As Integer Dim p(3)A sInteger k=5 For i=0 To 10 a(i)=i Next i For i=0 To 2
admin
2018-05-08
52
问题
有如下程序:
Private Sub Form_Click()
Dim i As Integer,a(10)As Integer
Dim p(3)A sInteger
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
P(i)=a(i*(i+1))
Next i
For i=0 To 2
k=k+P(i)*2
Next i
Print k
EndSub
运行程序,单击窗体,输出结果是( )。
选项
A、20
B、21
C、32
D、56
答案
B
解析
本题考查利用For循环给数组元素赋值,在事件过程中定义了两个整型数组,a和p,第一个For循环,给a数组中的每个元素赋值,循环共执行11次,a(O)=Oa(1)=la(2)=2……a(10)=10;利用第二个For循环给数组p中的元素赋值,循环共执行了3次,p(0)=a(0*(0+1))=a(0)=0p(1)=a(1*(1+1))=a(2)=2p(2)=a(2*(2+1))=a(6)=6;利用第三个For循环对数组p中的元素进行计算并将累加结果保存到变量k中,循环执行3次,k=5+p(0)*2+p(1)*2+p(2)*2=5+4+12=21,故最终变量K的值为21,所以B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/lSGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库应用系统中的核心问题是
程序流程图中带有箭头的线段表示的是
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.t
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Pic的图片框,通过属性窗口将考生文件夹下的文件Tul-1.jpg添加到图片框,然后编写适当的事件过程。运行程序时,单击窗体,在图片
关于变量作用域,下列叙述中正确的是()。
假定在窗体上添加了一个通用对话框控件,其名称为CDl,并有如下程序段:CDl.ShowOpen:CDl.DefaultExt=”doc”在打开文件的对话框中选择了”c:\filel.txt”文件,则FileTitle属性的值是
以下不可以作为“容器”的控件是
若要把窗体上命令按钮Commandl的状态设置为不可用,应该执行的命令是
在名称为Forml的窗体上画一个名称为Picturel的图片框,其宽和高分别为1700、1900。请编写适当事件过程,使得在运行时,单击图片框,则装入考生目录下的图形文件piel.bmp,如图2-117所示。单击窗体则图片框中的图形消失。要求程序中不得使用
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
随机试题
我国第一部由私人撰写的编年体史书是______。(2011年真题)
患者,男,60岁。腰胁部出现红色成簇丘疹、水疱3天,疼痛剧烈,舌红苔薄,脉弦数。应首先考虑的是()
(2006年)若则a与b的值是()。
北海公司为上海证券交易所A股上市公司,2011年发生了如下有关金融资产转移的交易或事项:(1)2011年1月26日,北海公司在证券市场上出售持有并分类为可供出售金融资产的丁公司债券,所得价款为6000万元。出售时该债券的账面价值为5900万元,
某企业经常安排职工加班,但是并没有及时合理地发放加班工资。对此员工们颇有怨言。但是由于工作难找,所以只能忍气吞声,并以消极怠工的方式来进行沉默的反抗。车间领班为了督促生产,不时地进行巡查训导,从而使得矛盾加大。如果社会工作者介入,可以采取哪些介入行动?(
中国人对小说的欣赏习惯,讲究的是无巧不成书,_______,也就是不喜欢一般化,而喜欢特殊化。填入画横线部分最恰当的一句是:
设f(x)在[0,1]可导,0<f’(x)<1,0<f(x)<1,且F(x)=1/2[x+f(x)]。设x0∈(0,1),xn+1=F(xn)(n=0,1,2,…),证明:
ReadthisletterfromMs.Sano,abusinessclubsecretary.
A、isprimarilyanalyticinitstendencytoseparatethequalitiesofdifferentsoundsfromoneanotherB、doesnotrelyontheop
EthicsinCompaniesI.TheimportanceofethicsA.【T1】______enablescompaniestoexploitthe【T1】______economicadvantages,w
最新回复
(
0
)