窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base 0
Dim a() As Integer, m As Integer
Private Sub Command1_Click()
m = InputBox( "请输入一个正整数" )
ReDim a(m)
End Sub
Private Sub Command2_Click()
m = InputBox( "请输入一个正整数" )
ReDim a(m)
End Sub
运行程序时,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a中元素的个数是( )。
A) 5
B) 6
C) 10
D) 11