设有如下程序： Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a = Array(1,2,3,4,5,6,7,8,9) For i = 0 To 3 Print a(5 – i); Next End Sub 程序运行后，单击窗体，则在窗体上显示的是（）
下面程序段是利用For语句给数组a赋值，使a(1)＝1，a(2)＝3，a(3)＝5，……，a(50)＝99，则划线处的语句应该是()。 Dim a(1 to 50) As Integer For i＝1 To 50 ______Next i
用下面语句定义的数组的元素个数是（） Dim A (-4 to 6) As Integer
以下程序的输出结果是 _____ 。Dim aa=Array（1，2，3，4，5，6，7）For i=Lbound（a） To Ubound（a）a（i）=a（i）* a（i）Next iPrint a（i）
语句Dim abc(-2 To 4,0 To 4,5)As Long定义的三维数组，其数组元素有__________ 。
默认情况下,语句 Dim A(-3 to 5,1) As interger 定义的数组元素个数是9个
用下面的语句所定义的数组的元素个数是（ ）。 Dim b(-2 to 5,3 to 5)
下列程序段的运行结果为（ ）。 Dim a Dim s%, i% a = Array(1, 2, 3, 4, 5) For i = 1 To 3 s = s + a(i) ^ 2 Next i Print s
设有如下声明语句： Option Base 1 Dim arr(3,-1 To 4) As Integer 则数组arr中数组元素的个数是（ ）
用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是().
用 Dim c(2 to 5) As Integer 语句定义的数组占用 个字节的内存空间。
数组声明语句 Dim a(4,1 To 5), 所声明的数组 a 中包含的元素有（ ）个。
运行下列程序段，其中语句“n = n + 1”被执行的次数是（ ）。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next
用Dim arr（3 To 5,-2 To 2)语句定义的数组元素个数是（）。A. 20B. 12C. 15D. 24
用下面的语句所定义的数组的元素个数是： ______。Dim arr（3 To 5，-2 to 2)A．20B．12C．15D．24
DIM a（3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素有【】个。
用下面的语句定义的数组元素的个数是 ______。 Dim Arrl（-2 To 6)As IntegerA．6B．7C．8D．9
语句Dim Arr（－2 To 3)As Integer所定义的数组的元素个数为（）。
有数组声明语句“Dim a（-2 To 2, 5)”，则数组包含元素个数为
17、运行下列程序段，其中语句“n = n + 1”被执行的次数是（）。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next
在“声明”段有语句Option Base 1，那么用如下语句声明的数组a包含的元素个数为（）。 Dim a（-1 To 3, 3, 4)
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序代码： Option Base 1 Dim arr（) As Integer Private Sub Command1_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 arr（i, j) = i + j Next j Next i ReDim Preserve arr（4, 4) For j = 3 To 4 arr（3, j) = j + 10 Next j For i = 1 To 4 s = s + arr（i, i) Next i Print s End Sub 程序运行过程中，当单击Command1时，输出结果为________。
数组声明语句 Dim a（3,2 To 5),所声明的数组a中包含的元素有（）个
有如下程序：Option Base 1Private Sub Form Click（）Dim arr,SumSum=0 arr=Array（1,3,5,7,9,11,13,15,17,19）For i=1 To 10If arr（i）/3=arr（i）//3 ThenSum=Sum+arr（i） En
