请阅读程序: Sub subP(b( )As Integer) For i=1 To4 b(i)=2*i Next i End Sub Private Sub Commandl 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 6 7 8
C.10 12 14 16
D.出错