窗体上有Commandl、Command2两个命令按钮。现编写以下程序：OptionBase 0Dim a（)As Integer，m As In

窗体上有Commandl、Command2两个命令按钮。现编写以下程序：

OptionBase 0

Dim a()As Integer，m As Integer

Private Sub Commandl_Click()

m=InputBox(”请输入一个正整数”)

ReDim a(m)

End Sub

Private Sub Command2_Click()

in=InputBox(”请输入一个正整数”)

ReDim a(m)

End Sub

运行程序时，单击Commandl后输入整数10，再单击Command2后输入整数5，则数组a中元索的个数是

A．5

B．6

C．10

D．11