[单项选择题] 窗体上有Command1、Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a()As Integer,m As Integer Private

[单项选择题] 窗体上有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

参考答案：

B

问题解析:

[知识点] 动态数组[评析] 在一般情况下，下标的下界默认为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个元素。