以下有关数组定义的语句序列中，错误的是 ______。 A: Static arrl(3) B: arrl(1)=100 C: arrl(2)="Hello" D: arrl(3)123.45 E: Dim arr2()As Integer F: Dim size As Integer G: Private Sub Command2_click() H: size=InputBox("输入:") I: ReDimarr2(size) J: End Sub K: Option Base1 L: Private Sub Command3_click() M: Dim arr3(3)As Integer N: End Sub O: Dim n As Integer P: Private Sub Command4_Click() Q: Dim arr4(n)As Integer R: End Sub

执行下列程序后，输出的结果是 Option Base 1 Private Sub Form_Click() Dim arr, s As Integer s = 0 arr = Array(2, 4, 6, 8, 10, 12, 14, 16, 18, 20) For i = 1 To 10 Step 2 If arr(i) Mod 3 = 0 Then s = s + arr(i) End If Next i Print s End Su A: 20 B: 22 C: 24 D: 26 E: 28 F: 其它都不对

运行下面的程序，第二行显示结果是___________。 Private Sub Form_Click() Dim A As Integer Dim i As Integer A = 5 For i = 1 To 9 Call sub1(i, A) Print i, A Next i End Sub Private Sub sub1(x As Integer, y As Integer) Static N As Integer Dim I As Integer For I = 3 To 1 Step -1 N = N + x x = x + 2 Next I y = y + N End Sub

在窗体上画一个名为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_ Click() Dim arr(4, 4) For i = 1 To 4 For j = 1 To 4 arr(i, j) = (i - 1) * 3 + j Next j Next i For i = 1 To 2 For j = 1 To 2 Print arr(i, j) Next j Next i End Sub程序运行后，单击命令按钮，输出结果为______ 。 A: 3 4 6 7 B: 7 8 10 11 C: 1 2 4 5 D: 8 9 12 13

阅读程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。 A: 13 B: 14 C: 27 D: 15