设有声明语句 Option Base 1 Dim a(-1 to 10,2 to 9,10)As Integer 则a数

题目
单选题
设有声明语句 Option Base 1 Dim a(-1 to 10,2 to 9,10)As Integer 则a数组中全部元素的个数为()。
A

960

B

920

C

900

D

1056

参考答案和解析
正确答案: B
解析: 暂无解析
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

设有声明语句

Option Base 1

Dim b(-1 To 10, 2 To 9, 20) As Integer

则数组b中全部元素的个数( )。

A.2310

B.1920

C.1500

D.1658


正确答案:B

第2题:

在通用声明中给出Option Base 1语句,则数组a包含( )个元素。

Dim a(3, -2 To 1, 5)

A、 120

B、 75

C、 60

D、 13


正确答案:C

第3题:

在窗体上添加一个命令按钮控件,名为Command1,事件过程如下,则执行结果是 Option Base 1 Private Sub Command1_Click() Dim a(5)As Integer Dim k As Integer Dim total As Integer a(1) = 2 a(2) = 5 a(3) = 4 a(4) = 10 a(5) = 6 For k = 1 To 5 Total = total + a(k) Next k Print total End SubA. 10 B.15 C. 27 D. 35


正确答案:C
【解析】要得到数组中的每个元素时,可以通过数组的下标来分别引用数组的各个元素。本程序的作用是通过一个for循环,计算数组中各元素值的总和并输出,for循环条件是1-5,因此循环了5次,即使数组元素a(1)-a(5)累加起来,所以最后输出结果为:2+5+4+10+6=27.

第4题:

以下有关数组定义的语句序列中,错误的是

A.Static arrl(3) arr1(1)=100 arrl(2)="Hello" arrl(3)=123.45

B.Dim arr2()As Integer Dim size As Integer Private Sub Command2_Click() size=InputBOX(“输入:”) ReDim arr2(size) ┄ End Sub

C.Option Base 1 Private Sub Command3_Click() Dim arr3(3)As Integer ┄ End Sub

D.Dim n As Integer Private Sub Command4_Click() Dim arr4(n)As Integer ┄ End Sub


正确答案:D
解析:本题考查动态数组的定义。A项定义了一个默认数组。B项定义了一个动态数组。C项直接定义。由于声明数组时不能通过变量声明数组长度,故D项是错误的。

第5题:

定义有5个整数型元素的数组,正确的语句是

A.Dim a(4) As Integer

B.Option Base 1:Dim a(5)

C.Dim a &(5)

D.Dime a(5) As Integer


正确答案:A
解析:在选项B中,语句Option Base 1不能放在过程中与Dim语句写在一行;选项C中,使用了多余的字符"&";选项D中的关键字错误。选项A中的4表示最大下标的值,而起始下标默认为0,数组包含a(0)到a(4)5个元素。

第6题:

( 15 ) 1 个二维数组可以存放 1 个矩形 . 在程序开始有语句 Option Base 0, 则下面定义的数组中正好可以存放 1 个 4*3 矩阵(即只有 12 个元素)的是( )

A ) Dim a ( -2 To 0,2 ) AS Integer

B ) Dim a ( 3,2 ) AS Ingeger

C ) Dim a ( 4,3 ) AS Ingeger

D ) Dim a ( -1 To -4,-1 To -3 ) AS Ingeger


正确答案:B

第7题:

(11)设有下列程序查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer,i As Integer Arr1=Array(12,435,76,-24,78,54,866,43) Min=arr1(1) For i=2 To 8 If arr1(1)<Min Then Next i Print"最小值:";Min End Sud


正确答案:Min=arr1(i)
【解析】题目要求输出数组中的最小值,分析程序可知,本程序求数组最小值的算法是:假设最小的值是第一个数组元素,并把它存在Min变量中,然后从数组的第二个元素开始逐个与Min变量对比,如果有比Min更小的数,则赋值给Min,这样对比到数组最后一个元素时,就能找到最小的元素,且它存储在Min变量中,因此最后只要输出Min变量值即可。

第8题:

—个二维数组可以存放—个矩阵。在程序开始有语句Option Base0,则下面定义的数组中正好可以存放—个4×3矩阵(即只有12个元素)的是______。

A.Dim a(-2 To 0,2)As Integer

B.Dima(3,2)As Integer

C.Dim a(4,3)As Integer

D.Dim a(-1 To -4,-1 To -3)As Integer


正确答案:B
解析:Option Base 0表示数组的下标是从0开始的。选项A和选项D不符合题意。选项B声明了一个整型的二维数组a,第一维下标范围是0~3,第二维下标范围是0~2,存放1个4×3矩阵。选项C声明了一个整型的二维数组a,第一维下标范围是0~4,第二维下标范围是0~3,存放一个5×4矩阵。

第9题:

设有声明语句 Dim b(-1 To 10,2 To 9,20)As Integer 则数组b中全部元素的个数

A.2310

B.2016

C.1500

D.1658


正确答案:B
解析:在本题中,Dimb(-1To10,2To9,20)AsInteger定义了一个三维数组,如果没有指定下界,缺省值是0,所以计算数组中的个数就容易了,表达式为:(10-(-1)+1)×(9-2+1)×(20-0+1)=2016,所以选项B是正确答案。

第10题:

以下有关数组定义的语句序列中,错误的是 ______。

A.Static arrl(3) arrl(1)=100 arrl(2)="Hello" arrl(3)123.45

B.Dim arr2()As Integer Dim size As Integer Private Sub Command2_click() size=InputBox("输入:") ReDimarr2(size) End Sub

C.Option Base1 Private Sub Command3_click() Dim arr3(3)As Integer End Sub

D.Dim n As Integer Private Sub Command4_Click() Dim arr4(n)As Integer End Sub


正确答案:D
解析:在数组定义中,定义的数组元素个数不能是变量。而选项D中的n是一个变量。

更多相关问题