首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序代码: Option Base 1 Dim arr()As Integer Private Sub Commandl_Click() Dim i As Inte
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序代码: Option Base 1 Dim arr()As Integer Private Sub Commandl_Click() Dim i As Inte
admin
2019-06-20
60
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序代码:
Option Base 1
Dim arr()As Integer
Private Sub Commandl_Click()
Dim i As Integer,j As Integer
Dim S As Integer
ReDim arr(4.2)
S=0
For i=1 To 3
For j=1 To 2
art(i,j)=i+j
Next j
Next i
ReDim Preserve art(4,4)
For j=3 To 4
art(3,j)=j+10
Next j
For i=1 To 4
S=S+arr(i,i)
Next i
Print s
End Sub
程序运行过程中,当单击Command1时,输出结果为( )。
选项
A、0
B、18
C、19
D、程序出错
答案
A
解析
动态数组的定义通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中用ReDim语句定义带下标的数组。“Option Base 1”语句表示数组下标从1开始,程序开头定义一个数组arr,在Commandl_Click过程中,使用ReDim重新定义数组的大小,双重For循环为数组元素赋值,arr(1,1)=2;arr(1,2)=3;arr(2,1)=3;arr(2,2)=4;arr(3,1)=4;arr(3,2)=5。语句“ReDim Preserve arr(4,4)”表示重新分配数组时,不清除数组中原来的数据。接下来的For语句中,循环变量j从3执行到4,arr(3,3)=3+10=13;arr(3,4)=4+10=14。最后一个For循环,循环变量i从1开始执行到4结束,每次累加数组元素的值,即s=arr(1,1)+arr(2,2)+arr(3,3)+arr(4,4)=2+4+13+0=19。故C选项正确。
转载请注明原文地址:https://kaotiyun.com/show/W5Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个图片控件和一一个按钮控件,下.列程序执行的结果是()。PrivateSubCommand1Click()Picturel.Picture=LoadPicture("c:\picture.jpg")Pi
下面程序执行时,输出的结果是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=10Doi=i+jForj=10Toi
下面的程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()Dima(1To6)AsIntegerDimmini%,i%,j%,n%,t%,k%a(1)=8
在窗体上有一个名称为List1的列表框和一个名称为Command1的命令按钮,并编写有如下事件过程:PrivateSubForm_Load()List1.Addltem"Iteml":List1.Addltem"Item2":
在软件开发中,需求分析阶段产生的主要文档是
软件设计中模块划分应遵循的准则是
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click()Text2.Text=UCas
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
以下不能用Print方法输出数据的对象或窗口是
随机试题
关于DNA上的内含子,叙述正确的是
A.嘈杂吐酸B.嗳腐吞酸C.胃中酸水上泛D.上泛酸水吐出者E.上泛酸水咽下者
可摘局部义齿上颌后堤区后缘应在
亚硝基化速度较快的胺是
对会计工作的社会监督包括()。
甲股份有限公司委托A证券公司发行普通股1000万股,每股面值1元,每股发行价格为4元。根据约定,股票发行成功后,甲股份有限公司应按发行收入的2%向A证券公司支付发行费。如果不考虑其他因素,股票发行成功后,甲股份有限公司记入“资本公积”科目的金额为(
甲公司是某省唯一一家风力发电企业,另外两家发电企业是火力发电企业。与其他两家发电企业相比,甲公司具有一定的经营优势,包括:(1)风力发电站设在本省最适宜设立风电厂的出口,该出口常年具有风力发电所必需的有效风速;(2)风机和风车等风力发电设备全部从国外进口;
在我国,企业和个人通过银行和其他交易中介卖出外汇换取本币的行为称为()。
学生彭某因参与赌博,屡教不改,经教育行政部门批准,下列没有权利将其送到工读学校的是()。
“改革是中国的第二次革命”主要是从
最新回复
(
0
)