[单项选择题] 下面程序运行后，输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInte

[单项选择题] 下面程序运行后，输出结果是( )。

Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2)

ForI=1 to 4

b(I)=n*I

NextI

End Sub

Private Sub Commandl_Click()

Dima(1 to 4)As Integer，I As Integer

Callmysub(a()，5)

Mysuba()

ForI=1 to 4

Print a(i)；

Next

End Sub

A．5101520

B．2468

C．出错

D．0000

B