Visual Basic 数组选择题.doc

数组一数组的概念 一维 多维 静态 动态 控件数组1在VB语言中，定义数组时，其下标允许是（B）A变量B常量C算数表达式（可含变量）D变量常量算术表达式（可含变量）2以下关于数组的说法正确的是（D）A在VB中，一个数组所包含的元素只能是相同类型的数据B在VB中，数组只能在模块中定义，不能在过程中定义C同普通变量一样，数组也可以不定义，先使用D在定义数组时，数组的每一维元素的个数必须是常数，不能是变量或表达式3(C).用语句 Dim A(-3 to 5) As Long 定义的数组元素个数是_。A. 7 B. 8 C. 9 D.104(A).下列语句声明的数组a包含的元素个数有_。A120 . B. 75 C. 60 D. 13Dim a(3 ，-2 to 2，5)5(C). 使用下列语句：Dim x(1 to 10,3) As Single，则数组占用内存空间的字节数是_。A. 132 B. 80 C. 160 D. 1206(A).下列语句声明的数组a包含的元素个数有_。A120 . B. 75 C. 60 D. 13Dim a(3 ，-2 to 2，5)7控件数组是通过（ ）来区分控件数组元素的。A 名称 B Count属性 C Index属性 D 控件标题8下列程序运行时，会产生（ ）错误。 Dim Stu(2, 3) For I = 1 To 4 For j = 1 To 5 Stu(I, j) = I * j Next j Next IA 下标越界 B 大小写不匹配 C 数组定义错误 D 循环嵌套错9下面的数组定义语句正确的是（ ）。A Dim a(3 to 6) B Dim a3 to 4 C Dim a(10 4) D Dim a310有以下数组声明语句：Option Base 1: Dim A(3,2 to 4)，则数组A有（ ）个元素。A 3 B 4 C 12 D 911语句：Dim S(-1 to 5) 定义的数组有（ ）个元素。A 4 B 6 C 5 D 712语句：Dim student(10,5) As String定义的数组元素的类型为（ ）。A 数值型 B 逻辑型 C 字符型 D 日期型13语句：Dim student(10,5) 定义的是一个（ ）维数组。A 1 B 2 C 5 D 1014语句：Dim student(10,5) 定义的数组有（ ）个元素。A 66 B 6 C 15 D 5015语句：Dim student(2 to 4, 5 to 6) 定义的数组有（ ）个元素。A 3 B 7 C 6 D 1016若在“通用说明”段写有Option Base 1语句，那么Dim a(3,4) As Integer声明的数组共有（C）个元素 A 20 B 7 C 12 D 1517用Dim A (-3 TO 3) As Integer语句定义的数组的元素个数是（D）A 6 B 7 C 8 D 9Cint(-3.5)=Cint(-3.5)=Fix(-3.5)=-4DLcase$(“ABC”)=”abc”,Ucase$(“Abc”)=”ABC”18阅读以下程序，执行该程序后，数组A和数组B的值分别是（C）Private Sub From_Click() Dim a(100), b(100) For i=1 to 100 A(i) = i Next i For i=1 to 100 b(i)= a(i) +a(i-1) Next iEnd SubA数组A和数组B各存储1100的自然数B数组A存储1100的自然数，数组B存储101200的自然数C数组A存储1100的自然数，数组B存储1199的奇数D数组A存储1100的自然数，数组B存储2200的偶数19控件数组的index的值是从（B）开始的A 于TabIndex相同 B 0 C 1 D 无效值20下列程序段的执行结果为（A）Dim A(10) As Integer,B(5) As IntegerFor I=1 To 10 A(I)=INext IFor J=1 To 5 B(J)=J*20Next JA(5)=B(2)Print “A(5)=”;A(5)A A(5)=5 B A(5)=10 C A(5)=20 D A(5)=4021(C). 使用下列语句：Dim x(1 to 10,3) As Single，则数组占用内存空间的字节数是_。A. 132 B. 80 C. 160 D. 12022(C). 下列程序段的循环结构执行后，i的输出值是_。Dim y as IntegerFor i = 1 To 10 Step 2 y = y + iNext iPrint iA) 25 B) 10 C) 11 D) 因为y初值不知道，所以不确定16(B). 设有如下的记录类型Type Student number As String name As String age As IntegerEnd Type则正确引用该记录类型变量的代码是_。A. S=张红 B. Dim s As Student =张红C. Dim s As Type Stuent D. Dim s As Type =张红 =张红23(A). 以下程序段的运行结果是_。Private Sub Form_Click() a = 1 b = a Do Until a = 5 X = a * b Print Str(a) & * & Str(b) & =; Str(X); a = a + b b = b + a LoopEnd SubA. 1*1=1 2*3=6 B. 1*1=2 2*2=4 C. 1*1=1 3*3=9 D. 1*1=2 3*2=624(D). 在窗体上画一个命令按钮Command1，然后编写如下代码：Private Sub Command1_Click() Dim a(4, 4) For i = 1 To 4 For j = 1 To 4 a(i, j) = (i - 1) * 3 + j Next j Next i For i = 3 To 4 For j = 3 To 4 Print a(j, i); Next j Print Next iEnd Sub程序运行后，单击命令按钮，输出结果是_。A. 6 9 B. 7 10 C. 8 11 D. 9 12 7 10 8 11 9 12 10 1325(B). 下列程序段的运行结果是_。 Private Sub Command1_Click() Dim a(3) As Long a(0) = 1: a(1) = 2: a(2) = 3: a(3) = 4 j = 1 For i = 3 To 0 Step -1 s = s + a(i) * j j = j * 10 Next i Print sEnd SubA. 4321 B. 1234 C. 34 D. 1226若有说明：Dim a (1 to 10) AS Integer,则下列应用（C）合法A a (1)=”adk” B a (7)=32768C a (8)=”23”D a (0)=2.327下列语句中（B）可以用来正确声明一个动态数组A Private A(n) As IntegerB Dim A() As IntegerC Dim A(,) As IntegerD Dim A(1 to n)28如下数组声明语句，（B）正确A Dim a3 As Integer B Dim a(3)As IntegerC Dim a(n)As IntegerD Dim a(,) As Integer29下列的数组声明语句中（B）是正确的A Dim A3,4 As IntegerB Dim A(3,4) As Integer C Dim A3;4 As IntegerD Dim A(3;4) As Integer30一下说法中，不正确的是（A）A数组下标的下界默认值是0，上届可以为负数，但下届必须小于上届B Dim(-1 TO 1,5,10 TO 15)定义了数组X，则数组X可存储的元素个数是108C同一数组中的各元素，在计算机中的存储是连续的，大小是固定的D数组元素的下标可以是常数，变量，但不能是表达式31若有说明：Dim a(3,4) As Integer,则下面正确的叙述是（C）A此说明语句不正确B只有a（0，0）初值为0C数组a中每个元素的初值都为0D每个元素都有初值，但未必都为032二维数组元素在内存中存放的顺序是（A）A按列主顺序存放B按行住顺序存放C不在内存中D随机存放33若二维数组a有m行，则计算任一元素a(i,j)在数组中的位置的公式为（D）（设a(0,0)位于第一位）A i*m+j B j*m+i C i*m+j-1 D i*m+j+134若二维数组a有m行，则在a(i,j)前的元素的个数为（A）A i*m+j B j*m+i C i*m+j-1 D i*m+j+135一下说法不正确的是（C）A使用ReDim语句可以改变数组的维数B使用ReDim语句可以改变数组的类型C使用ReDim语句可以改变数组每一维的大小D使用ReDim语句可以对数组中的所有元素进行初始化36(C). 以下程序段的运行结果是_。Private Sub Form_Click() Dim x() As String a = How are you! n = Len(a) ReDim x(1 To n) For i = n To 1 Step -1 x(i) = Mid(a, i, 1) Next I For i = 1 To n Print x(i); Next iEnd SubA. !uoy era woHB. !uoy era woh C. How are you! D. how are you!37在窗体上画三个单选按钮，组成一个名为chkOption的控件数组，用于标识控件数组各元素的参数是(B)A Tag B Index C ListIndex D Name二 数组相关函数 Array LBound UBound38执行以下Command1的Click事件过程结果（B）Option Base 0Private Sub Command1_Click() Dim a a=Array(“a”,”b”,”c”,”d”,”e”,”f”,”g”)Print a(1);a(3);a(5)End SubA abc B bdf C ace D 出错39执行以下Command1的Click事件过程结果（D）Option Base 1Private Sub Command1_Click() Dim a a=Array（1，2，3，4） j=1 For i=4 To 1 Step -1 s=s+a(i)*j j=j*10Next i Print sEnd SubA 4321 B12 C34 D123440(D). 以下程序运行的结果是_。Dim aa=Array(1, 3, 4, 5, 6, 7)For i = LBound(a) To UBound(a) a(i) = a(i) * a(i)Next iPrint a(i)A) 49 B) 0 C) 不确定 D) 下标越界41(C). 定义数组Array(1 to 5,5)后，下列哪一个数组元素不存在_。A. Array(1,1) B. Array(1,0) C. Array(0,1) D. Array(5,5)42(D). 在窗体上添加一个命令按钮Command1，然后编写如下代码：Private Sub Command1_Click() Dim city As Variant city = Array(北京, 上海, 天津, 重庆) Print city(1)End Sub程序运行后，单击命令按钮，输出结果是_。 A. 空白 B. 错误提示 C. 北京 D. 上海43(D). 以下程序运行的结果是_。Option Base 1Private Sub Command1_Click() Dim a,b(3,3) a=array(1,2,3,4,5,6,7,8,9) For i=1 To 3 For j=1 To 3 b(i,j)=a(i*j) If (j=i) Then Print Tab(j*3);Format(b(i,j),# # #); Next j Print Next iEnd Sub A. 1 2 3 B. 1 C. 1 4 7 D.1 2 3 4 5 6 4 5 2 4 6 4 6 7 8 9 7 8 9 3 6 9 944(B). 在窗体上画一个命令按钮Command1，然后编写如下代码：Private Sub Command1_Click() Dim arr1(10), arr2(10) As Integer n = 3 For i = 1 To 5 arr1(i) = i arr2(n) = 2 * n + i Next i Print arr1(n),arr2(n); End Sub程序运行后，单击命令按钮，输出结果是_。A) 11 3 B) 3 11 C) 13 3 D) 3 1345(C). 有如下程序：Private Sub Form_Load() Dim arr1(10, 10) As Integer Dim i, j As Integer For i = 1 To 3 For j = 2 To 4 arr1(i, j) = i + j Next j Next i Text1.Text = arr1(2, 3) + arr1(3, 4)End Sub程序运行后，单击窗体，在文本框显示的值是_。A. 5 B. 7 C. 12 D. 2046(C). 在窗体上添加一个命令按钮Command1，然后编写如下代码：Option Base 1Private Sub Command1_Click() d = 0: c = 10 x = Array(10, 12, 21, 32, 24) For i = 1 To 5 If x(i) c Then d = d + x(i) c = x(i) Else d = d - c End If Next i Print dEnd Sub程序运行后，单击命令按钮，输出结果是_。A. 89 B. 99 C. 23 D. 77三 基本操作 输入 输出 复制47设用复制，粘帖的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是（B）A命令按钮的所有Caption属性都是Command1B在代码中访问任意一个命令按钮只需使用名称Command1C命令按钮的大小都相同D命令按钮共享共同的事件过程48(A). 在Visual Basic中，InputBox函数的默认返回值类型为字符串，用InputBox函数输入数值型数据时，下列操作