首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10, 10)As Integer Dim i As Intege
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10, 10)As Integer Dim i As Intege
admin
2018-09-19
93
问题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim array1(10, 10)As Integer
Dim i As Integer, j As Integer
For i=1 To 3
For j=2 To 4
array1(i, j)=i+j
Next j
Next i
Text1.Text=array1(2, 3)+array1(3, 4)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是( )。
选项
A、15
B、14
C、13
D、12
答案
D
解析
程序中通过For循环为数组中部分元素赋值,没有赋值的元素值将默认为0。循环中i=2,j=3时,array1(i,j)=i+j,即array1(2,3)=5,i=3,j=4时,array1(3,4)=3+4,即array1(3,4)=7。5+7=12,因此程序文本框中显示值是12。
转载请注明原文地址:https://kaotiyun.com/show/F6Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于文件叙述中错误的是( )。
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(12,3,8,5,10,3,5,9,2,4) Fork=1To9 Printfun(a(k-1),a(
编写如下程序:PrivateSubForm_Click()DimiAsInteger,jAsIntegerDimnumAsIntegerDimarr(3,3)AsIntegernum=1
构成计算机软件的是
下面关于水平滚动条的Max,Min属性的叙述中错误的是
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
(1)在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为
算法的空间复杂度是指( )。
随机试题
下列关于期间的说法,正确的是哪些?
下图是设计准备阶段项目管理工作流程图,该阶段项目管理方的主要任务有()。
某工程,建设单位和施工单位按《建设工程施工合同(示范文本)》签订了施工合同,在施工合同履行过程中发生如下事件:事件1:工程开工前,总监理工程师主持召开了第一次工地会议。会上,总监理工程师宣布了建设单位对其的授权,并对召开工地例会提出了要求。会后,项
甲公司期末进行财产清查时,发现如下情况:(1)现金盘盈629元,原因待查。(2)经查明现金盘盈属于多收乙公司的货款,报经有关部门批准将给予退回。(3)库存商品盘亏4010元,原因待查。(4)经查明,库存商品盘亏属于
法人应当具备下列哪些条件?()
在认知风格中,与“场独立”相对的认知风格叫______。
根据以下资料,回答下列问题。2008年世界稻谷总产量68501.3万吨,比2000年增长14.3%;小麦总产量68994.6万吨,比2000年增长17.8%;玉米总产量82271.0万吨,比2000年增长39.1%;大豆总产量23095.3万吨,比200
可从舰艇、飞机上发射,接触舰船就可以爆炸的水中武器是()。
从年画的艺术形式特点上,可以感受到:饱满的构图、鲜明的形象似乎潜藏有盼望大团圆、祈愿丰收和吃饱饭等意思;挺拔的线条,反映出健康、有力的含义;鲜明的色彩,体现出火红喜庆的意思。中国人偏爱红色,它象征太阳、温暖、热闹、吉祥等意思,所以年画上,人们挂红灯笼、穿红
Themainideaofthispassageis______.Whatissaidabouttheover100aircraftincidentsinthepast15years?
最新回复
(
0
)