[單項(xiàng)選擇題] 窗體上有Command1、Command2兩個(gè)命令按鈕?，F(xiàn)編寫(xiě)以下程序： Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click()m=InputBox("請(qǐng)輸入—個(gè)正整數(shù)")ReDim a(m) End Sub Private Sub Command2_Click()m=InputBox("請(qǐng)輸入—個(gè)正整數(shù)")ReDim a(m) End Sub 運(yùn)行程序時(shí)，單擊Command1后輸入整數(shù)10，再單擊Command2后輸入整數(shù)5，則數(shù)組a中元素的個(gè)數(shù)是______。

A．5

B．6

C．10

D．11

B

[知識(shí)點(diǎn)] 動(dòng)態(tài)數(shù)組[評(píng)析] 在一般情況下，下標(biāo)的下界默認(rèn)為0。如果希望下標(biāo)從1開(kāi)始，可以通過(guò)Option Base語(yǔ)句來(lái)設(shè)置，其格式為：Option Base n。Option Base語(yǔ)句用來(lái)指定數(shù)組下標(biāo)的默認(rèn)下界。 Redim[Preserve]變量(下標(biāo))As類(lèi)型：該語(yǔ)句用來(lái)重新定義動(dòng)態(tài)數(shù)組，按定義的上下界重新分配存儲(chǔ)單元，并可為定義的變量改變存儲(chǔ)類(lèi)型。當(dāng)重新分配動(dòng)態(tài)數(shù)組時(shí)，數(shù)組中的內(nèi)容將被清除，但如果在ReDim語(yǔ)句中使用了Preserve選擇項(xiàng)，則不清除數(shù)組內(nèi)容。在ReDim語(yǔ)句中可以定義多個(gè)動(dòng)態(tài)數(shù)組，但每個(gè)數(shù)組必須事先用“Dim Variable()as...”或“Public Variable()as...”這種形式聲明，在括號(hào)中省略上下界，在用Redim語(yǔ)句重新定義時(shí)重新指定數(shù)據(jù)下標(biāo)的上下界。Redim語(yǔ)句只能出現(xiàn)在事件過(guò)程或通用過(guò)程中，用它定義的數(shù)組是一個(gè)“臨時(shí)”數(shù)組，即在執(zhí)行數(shù)組所在的過(guò)程時(shí)為數(shù)組開(kāi)辟一定的內(nèi)存空間，當(dāng)過(guò)程結(jié)束時(shí)，這部分內(nèi)存即被釋放。本題中，首先執(zhí)行命令按鈕Command1的單擊事件，再執(zhí)行命令按鈕Command2的單擊事件，在命令按鈕Command2的單擊事件中，數(shù)組a()被重新定義為數(shù)組a(5)，原先數(shù)組中的內(nèi)容被清除，程序中指定數(shù)組的默認(rèn)下界為0，數(shù)組a(5)等價(jià)于a(0 To 5)，因此含有6個(gè)元素。