有以下程序：Sub subP（b（）As Integer）For i=1 To 4b（i）=2*iNext iEnd SubPrivate Sub Commandl Click（）Dim a（1 To 4）As Integer a（）=5 a（）=6 a（）=7 a（）=8 subP a（）For i=1 To 4 Print a（i）End Sub运行上面的程序，单击命令按钮，输出结果为（）-计算机二级-简明问答题库

问题描述：

[单选] 有以下程序：Sub subP（b（）As Integer）For i=1 To 4b（i）=2*iNext iEnd SubPrivate Sub Commandl Click（）Dim a（1 To 4）As Integer a（）=5 a（）=6 a（）=7 a（）=8 subP a（）For i=1 To 4 Print a（i）End Sub运行上面的程序，单击命令按钮，输出结果为（）

A．2468 B．5678 C．10121416 D．出错