首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序代码: Option Base1 Dim arr()As Integer Frivate Sub Command1_Click() Dim i As Intcger,j As Integer ReDim arr(3,2) For i=1To3
编写如下程序代码: Option Base1 Dim arr()As Integer Frivate Sub Command1_Click() Dim i As Intcger,j As Integer ReDim arr(3,2) For i=1To3
admin
2018-06-20
49
问题
编写如下程序代码:
Option Base1
Dim arr()As Integer
Frivate Sub Command1_Click()
Dim i As Intcger,j As Integer
ReDim arr(3,2)
For i=1To3
For i=1To2
air(i,j)=i+j
Next i
Next i
ReDim arr(3,4)
For i=3To4
arr(3,j)=j+6
Next i
Print arr(3,2)+arr(3,4)
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、15
B、12
C、13
D、10
答案
D
解析
题目在过程command1_Click之前声明了动态数组arr,并使用Option Base1语句声明数组下标从1开始,在Command1_Click过程中使用ReDim语句对动态数组进行了定义,arr数组是一个3行2列的数组,接着使用二重For循环给数组中的运算进行赋值,arr(1,1)=1+1=2;arr(1,2)=1+2=3;arr(2,1)=2+1=3;arr(2,2)=2+2=4;arr(3,1)=3+1=4;arr(3,2)=3+2=5。接着继续使用ReDim语句对动态数组进行定义,arr数组被定义为3行4列的数组,并且当重新分配动态数组时,数组中的内容被清除。接着使用For循环给数组元素赋值,循环共执行2次,数组元素arr(3,3)=3+6=9;arr(3,4)=4+6=10。接着使用print方法输出arr(3,2)+arr(3,4)的结果,由于第二次重新分配动态数组,第一次计算出的arr(3,2)的结果被清除,而第二次并未对数组运算arr(3,2)赋值,所以arr(3,2)默认为0,表达式最终的结果为0+10=10,故D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/viGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommandl_Click()DimiAsIntegerFori=1To500
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load()Textl.Text="":Textl.SetFocusEndSubPrivateSubFor
设有如下程序:PrivateSubForm_Click()num=InputB0x(”请输入一个实数”):P=InStr(num,”.”)Ifp>0Then
窗体上有一个名称为commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSub
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerR
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandlClick()a$=InputBox(”请输入一个二进制数”):n=Len(a$)Fori=1Ton
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=””:strL=Len
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()Text1.Text=””:Text2.Text=””:Text1.SetFocusEnd
随机试题
1975年以来,美国的麻疹等传统儿童疾病的发病率已经有了显著的下降。这一下降的同时伴随着儿童中间彼特逊病——一种迄今为止罕见的病毒感染——发病率的上升。但是,很少有成年人被这种疾病侵袭。下面哪项如果正确,最有助于解释儿童中间彼特逊病发病率的上升?
简述审美对象的特征。
糖原合成时,活性葡萄糖供体是()
A.腹外斜肌B.腹横肌C.腹股沟韧带D.腹外斜肌腱膜E.腹横筋膜形成腹股沟管前壁的是()
囊虫病(猪囊尾蚴病)的传染源是()
李先生,男50岁,收缩压为160mmHg,舒张压为90mmHg,血脂偏高,劳累后感到心前区疼痛,休息后可缓解,心电图检查T波倒置,诊断为冠心病收入心内科。护士需重复测量血压,要驱净袖带内气体,使汞柱降至“0”点,其目的是
下列有关消防站级别的表述,正确的是()。
中国南方航空公司代码是()。
下列战役中,对三国鼎立局面的形成影响最大的是()。
加利福尼亚的消费者在寻求个人贷款时,可借助的银行比美国其他州少,银行间竞争的缺乏解释了为什么加利福尼亚的个人贷款利率高于美国其他地区。下面哪个论述,如果正确,最显著地削弱了以上的结论?()
最新回复
(
0
)