单项选择题

有程序如下:
Sub subP(b() As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Private Sub Command1_Click()
Dim a(1 To 4) As Integer
a(1)=5
a(2)=6
a(3)=7
a(4)=8
subP a()
For i=1 To 4
Print a(i)
Next i
End Sub
运行上面程序，单击命令按钮，输出结果为______ 。

A．2
4
6
8
B．5
2
2
2
C．10
12
14
16
D．出错

<上一题目录下一题>

热门试题

单项选择题

单项选择题

有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。