语句Dim s（1 to 5）as Boolean定义的数组是（）类型的元素。

语句Dim s（1 to 5）as Single定义的数组是（）类型的元素。

设有数组说明语句：Dim c（-1 To 1，1 To 5），则下列表示数组c的元素选项中（）是正确的。

语句Dim arr（-3 To 5，2 To 6）As Integer定义的数组元素有（）个。

语句Dim s（1 to 5）as Currency定义的数组是（）类型的元素。

下面程序段是利用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 s（1 to 5）as String定义的数组是（）类型的元素。

语句Dim birthday（1 to 5）as Date定义的数组是（）类型的元素。

语句Dim s（5）as Single定义的数组默认情况下有（）个元素。

下列程序中 s = s + j 语句共执行了______次。Dim s As IntegerDim i As Integer, j As IntegerFor i = 1 To 10 Step 2For j = 1 To 5 Step 2s = s + jNext jNext iPrint s

执行下面程序段后，输出的结果为（  ）。Dim m(5) As Integers = 0For i = 0 To 5m(i) = 5Next iFor j = 0 To 5s = s + m(j)Next jPrint s

有如下语句： Option Base 1 Private Sub Command1_Click() Dim A(2, -1 To 1) As Integer …… End Sub 以上语句所定义的数组 A为（ ）维数组，共有（ ）个元素，第一维下标从（ ）到（ ），第二维下标从（ ）到（ ）。

设有下列函数过程 Function fun（m As Integer）As Integer Dim k As Integer,sum As Integer sum=0 For k=m To 1 Step -3 sum=sum+k Next k fun=sum End Function 若在主程序中使用语句 s=fun（9）调用此函数，则s 的值为（ ）。

语句Dim abc(-2 To 4,0 To 4,5)As Long定义的三维数组，其数组元素有__________ 。

语句： Structure MyStruct Dim No As Integer Dim Sex As Char End Structure Dim s(100) As MyStruct 以下叙述不正确的是（ ）

默认情况下,语句 Dim A(-3 to 5,1) As interger 定义的数组元素个数是9个

设有如下声明语句： Option Base 1 Dim arr(3,-1 To 4) As Integer 则数组arr中数组元素的个数是（ ）

求1！+2！+……+10!的程序如下： Private Function s(x As Integer) f=1 For i=1 To x f=f*i Next s=f End Function Private Sub Command1_Click() Dim i As Integer Dim y As Long For i=1 To 10 _____________ Next Print y End Sub

用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是().

用 Dim c(2 to 5) As Integer 语句定义的数组占用 个字节的内存空间。

默认情况下，对数组定义语句：Dim S (20) As Double，以下说法正确的是（）

DIM a（3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素有【】个。

语句Dim Arr（－2 To 3)As Integer所定义的数组的元素个数为（）。

在窗体上画一个名称为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时，输出结果为________。

求s=1+1×2+1×2×3+…+1×2×3×…×10， 并将结果存到变量s中。请在_________处填上适当的内容，完善程序。 Private Sub Form_Click（) Dim i, j As Integer Dim k As Long s = 0 For i = 1 To 10 k = ____________ For j = 1 To i k = k*j Next j s = s+k Next i Print “s=”;s End Sub