以下程序输出的结果是________。 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(i * j) If (j >= i)Then Print Tab(j * 3);Format(b(i,j),"###"); Next j Print Next i End Sub
A. 1 4 5 7 8 9
B. 1 2 3 4 6 9
C. 1 4 7 2 4 6 3 6 9
D. 1 2 3 4 5 6 7 8 9
查看答案
下列语句组,正确的是________。
A. Dim a() As Integer ReDim a(m + 10)
B. m = 10 Dim a(m)As Integer ReDim a(m + 10)
C. Dim a() ReDim a(m + 10)As Integer
Dim a()As Integer ReDim a(2,3) ReDim Preserve a(3,3)
默认情况下,下面声明的数组的元素个数是________。 Dim a(3,-2 To 2)
A. 15
B. 16
C. 20
D. 12
如下数组声明语句中,________是正确的。
A. Dim a[3,4] As Integer
B. Dim a(n,n)As Integer
C. Dim a(3 4)As Integer
Dim a(3,4)As Integer
要为如下方阵的数据分配存储空间,可使用________数组声明语句(不能浪费空间)。
A. Dim a(3,3)As Single
B. Dim a(-1 To 1,-5 To -3)As Single
C. Dim a(-3 To -1,5 To 7)As Integer
Dim a(9)As Single