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

Option Base 0

D．im a( ) As Integer, m As Integer

Private Sub Command1_Click( )

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

ReDim a(m)

E．nd Sub

Private Sub Command2_Click( )

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

ReDim a(m)

E．nd Sub

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

（ ）。

A．）5

B．）6

C．）10

D．）11