首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arrayl(10,10)As Integer Dim i As
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arrayl(10,10)As Integer Dim i As
admin
2016-08-24
53
问题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim arrayl(10,10)As Integer
Dim i As Integer,j As Integer
For i=1 To 3
For i=2 To 4
arrayl(i,j)=i+j
Next j
Next i
Text1.Text=arrayl(2,3)+arrayl(3,4)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是( )。
选项
A、15
B、14
C、13
D、12
答案
D
解析
程序中通过For循环为数组中部分元素赋值,没有赋值的元素值将默认为0。循环中i=2,j=3时,arrayl(i,j)=i+j,即array1(2,3)=5,i=3,j=4时,arrayl(3,4)=3+4,即array1(3,4)=7。5+7=12,因此程序文本框中显示值是12。
转载请注明原文地址:https://kaotiyun.com/show/SiLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNuinAsString*20EndType要求在执行事件过程Command1_Click时,在顺序文
单击命令按钮时,下列程序代码的执行结果为()。PrivateFunctionPickMid(xStrAsString)AsStingDimtempStrAsStringDimstrLenAsIntege
语句Print5*5\5/5的输出结果是______。
andomize语句的功能是()。
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load0ShowText1.Text=""Text2.Text=""Te
计时器控件能有规律的以一定时间间隔触发______事件,并执行该事件过程中的程序代码。
下列叙述中,不属于测试的特征的是
设有数组定义语句:Dima(5)AsInteger,List1为列表框控件。下列给数组元素赋值的语句错误的是
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是()。
在面向对象程序设计中,从外面看只能看到对象有外部特征,而不知道也无须知道数据的具体结构以及实现操作的算法,这称为对象的______。
随机试题
男性,60岁,腰疼4个月,时轻时重。体格检查:腰2、3叩击痛,平片示腰2椎体压缩变扁,密度减低,其上下椎间隙正常,腰4左侧椎弓根显示模糊。下列哪项检查对诊断无价值:()
钻孔时加切削液的主要目的是提高孔的表面质量。( )
研究人员报告说,动物脑部具有不同的功能的区域占总脑量的比例是物种的一个重要特征。他们发现,在同物种中,不同个体之间的脑容量可能有明显差别,但脑部结构特征基本一致;而不同物种之间,结构特征就有较大的差异,研究人员据此认为,脑部结构特征将有助于分辨不同物种间的
甲、乙双方签订了成套设备条购合同,合同总价为200万元人民币。合同订立后,甲方向乙方支付了30万元人民币定金,乙收取定金后拒不发货,则甲可以要求乙返还()万元人民币。
在评估会议秘书处理突发事件的能力时,采用的标准是()。
大班幼儿正处于恒牙萌发的阶段。在幼儿园经常会出现这样的情况,当一个幼儿掉牙后,其他幼儿就会围过来观察,有的说“你的牙齿流血了”,有的说“你的牙齿好黑”,有的说“我看看你的牙齿”。幼儿对换牙充满好奇。孙老师认为可以根据幼儿的兴趣生成一个“我的牙齿”主题活动,
0,4,3,10,6,7,()
霍瓦-多尔曼(Haward-Dolman)仪常用来测定()。(2012年)
由可变限积分求导公式可得[*]
Whoisgivingadvice?
最新回复
(
0
)