[单项选择题] 窗体上有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
参考解析:[知识点] 动态数组[评析] 在一般情况下,下标的下界默认为0。如果希望下标从1开始,可以通过Option Base语句来设置,其格式为:Option Base n。Option Base语句用来指定数组下标的默认下界。 Redim[Preserve]变量(下标)As类型:该语句用来重新定义动态数组,按定义的上下界重新分配存储单元,并可为定义的变量改变存储类型。当重新分配动态数组时,数组中的内容将被清除,但如果在ReDim语句中使用了Preserve选择项,则不清除数组内容。在ReDim语句中可以定义多个动态数组,但每个数组必须事先用“Dim Variable()as...”或“Public Variable()as...”这种形式声明,在括号中省略上下界,在用Redim语句重新定义时重新指定数据下标的上下界。Redim语句只能出现在事件过程或通用过程中,用它定义的数组是一个“临时”数组,即在执行数组所在的过程时为数组开辟一定的内存空间,当过程结束时,这部分内存即被释放。本题中,首先执行命令按钮Command1的单击事件,再执行命令按钮Command2的单击事件,在命令按钮Command2的单击事件中,数组a()被重新定义为数组a(5),原先数组中的内容被清除,程序中指定数组的默认下界为0,数组a(5)等价于a(0 To 5),因此含有6个元素。