超星 - 数组测验 - 查题吧

单选题

下列程序段的执行结果为（）。 Dim A(10) As Integer,B(5) As Integer For I=1 To 10 A(I)=I Next I For J=1 To 5 B(J)=J*20 Next J A(5)=B(2) Print “A(5)=”;A(5)

A(5)=40
B. A(5)=5
C. A(5)=20
D. A(5)=10

单选题

设执行以下程序段时依次输入1，3，5，执行结果为（）。 Dim a(4) As Integer,b(4) As Integer For K=0 To 2 a(K+1)=Val(InputBox(“请输入数据：”)) b(3-K)=a(K+1) Next K Print b(K)

A. 0
B. 5
C. 3
D. 1

单选题

执行以下Command1的Click事件过程结果（）。 Option Base 0 Private Sub Command1_Click() Dim a a=Array(“a”,”b”,”c”,”d”,”e”,”f”,”g”) Print a(1);a(3);a(5) End Sub

A. abc
B. bdf
C. 出错
D. ace

单选题

在窗体上画一个命令按钮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. 3 11
B. 11 3
C. 3 13
D. 13 3

单选题

下列程序段的运行结果是（）。 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 s End Sub

A. 12
B. 4321
C. 1234
D. 34

单选题

有如下程序代码，输出结果是（）。 Dim a() a=Array(1,2,3,4,5) for i=Lbound(a）to Ubound(a) print a(i); next I

A. 4 3 2 1 0
B. 5 4 3 2 1
C. 0 1 2 3 4
D. 1 2 3 4 5

单选题

窗体上有一个名称为Command1的命令按钮，单击该按钮时所实现的功能是产生10个随机整数，然后从键盘输入一个整数，查找该数在数组中的位置。若找到，输出该数的位置；若没有找到，给出相应的提示。该命令按钮的单击事件过程如下： Private Sub Command1_Click（） Dim a（10）As Integer Dim x As Integer For i = 1 To 10 a（i）= Int（Rnd * 100） Next x = InputBox（"输入100以内的整数："） p = 0 For i = 1 To 10 If a（i）= x Then p = i Exit For End If Next If p = 0 Then Print "没有找到与输入数据相同的数！" Else Print Str（x）+ "在数组中的位置是" + Str（p） End If End Sub 对于上述事件过程，以下叙述中正确的是（）

A. 程序有错，p的初值设置不对
B. 若产生的随机数中有相同数，则p是其中最后一个数的位置
C. 程序有错，InputBox函数产生的数据与x的类型不匹配
D. 本程序实际产生的随机数是0-99

单选题

以下程序运行的结果是（）。 Option Base 1 Private 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(ij) If (j>=i) Then Print Tab(j3);Format(b(i,j),"# # #"); Next j Print Next i End Sub

A. 1 4 5 7 8 9
B. 1 4 7 2 4 6 3 6 9
C. 1 2 3 4 6 9
D. 1 2 3 4 5 6 7 8 9

单选题

二维数组元素在内存中存放的顺序是（）。

A. 随机存放
B. 不在内存中
C. 按列主顺序存放
D. 按行住顺序存放

单选题

在窗体上画三个单选按钮，组成一个名为chkOption的控件数组，用于标识控件数组各元素的参数是（）。

A. Index
B. Name
C. ListIndex
D. Tag

4