首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有以下程序: Option Base 1 Dim arr()As Integer Private Sub Form Click() Dim i As Integer,j As Integer ReDim arr(3
有以下程序: Option Base 1 Dim arr()As Integer Private Sub Form Click() Dim i As Integer,j As Integer ReDim arr(3
admin
2009-03-16
34
问题
有以下程序: Option Base 1 Dim arr()As Integer Private Sub Form Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr(i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next j Print arr(3,2);arr(3,4) End Sub 程序运行后,单击窗体,输出结果为______。
选项
A、813
B、013
C、712
D、00
答案
A
解析
ReDim语句的功能是为动态数组变量重新分配存储空间。而Preserve的功能是当改变原有数组最末维的大小时,使用此关键字可以保持数组中原来的数据。从题目可以看出,第一个For循环是为3行2列的数组赋值,而第二个For循环是为第3行的第3、4列赋值。而arr(3,2)=i*2+j=3*2+2=8,arr(3,4)=j+9=4+9=13,故输出结果为8、13。
转载请注明原文地址:https://kaotiyun.com/show/Tk1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列JApplet实现了一个不可编辑的JTextArea和一个JButton。请填写正确的程序代码。importjavax.swing.*;importjava.awt.*;publicclassTest17extends
数据的物理独立性是指当数据的【】改变时,通过系统内部的自动映象或转换功能,保持了数据的逻辑结构不变。
以下程序的运行结果为()。publicclassSun{publicstaticvoidmain(Stringargs[]){Stringx="A",y="B",z="
运行下面程序后,正确的输出结果是()。publicclassSun{publicstaticvoidmain(Stringargs[]){intx=6;if(x
数据管理技术的发展是与计算机技术及其应用的发展联系在一起的,经历了由低级到高级的发展过程。分布式数据库、面向对象数据库等新型数据库是属于()。
采用面向对象技术开发的应用系统的特点是()。
下列安全控制命令中,属于现实证书缓存区和密钥表项命令的是()。
如下图所示的4棵二叉树中:不是完全二叉树的是()。
设一棵二叉树的中序遍历结果为DBEAFC,前序遍历结果为ABDECF,则后序遍历结果为【】。
在深度为5的完全二叉树中,度为2的结点数最多为【】。
随机试题
骨髓位于①___________________和②___________________的间隙中,可分为③___________________和④___________________两种。
空调降温效果不好,压缩机频繁启动断开的原因是什么?怎样排除?
A.夹气B.垂泉C.掠草D.滚蹄E.三江治疗马漏蹄宜选
对诊断小儿营养不良最有诊断价值的病史是
细辛的用量为
在建立工程项目分解结构中,识别项目主要组成部分时应从便于项目实施管理和()等方面考虑。
保管期满但未结清的债权债务原始凭证,经会计主管人员批准后可以销毁。()
梦的离奇古怪又似乎和文艺家们的离奇想象有点相似,文艺家们_________的想象,古今天地万物的无所不包,无奇不有,但是和梦相比,文艺家们似乎也要_________。在梦里,人人都是一个艺术家,白天不能实现的,梦里就能实现;白天不能见到的,梦里就能见到;白
据媒体报道,美国教育部下属机构国家教育统计中心网站2013年3月22日在“每日语录”一栏中引用毛泽东“对自己,‘学而不厌’;对人家,‘诲而不倦”’的名言,国家教育统计中心因此遭到猛烈抨击。有美国参议员出面表示,教育部必须解释为何引用“共产主义者”的话。该中
ItwasadaythatMichaelEisnerwouldundoubtedlyliketoforget.SittinginaLosAngeleswitnessboxforfourhourslastweek
最新回复
(
0
)