[單項(xiàng)選擇題] 在窗體上畫一個(gè)命令按鈕，然后編寫如下事件過程：　　Sub BTC(old Copy( ) As Integer，new Copy( ) As Integer)　　　　Dim i AS Integer　　　　For i=LBound(oldCopy( ))To UBound(oldCopy( ))　　　　　newCopy(i)=oldCopy(i)　　　　Next i　　End Sub　　Private Sub Command1 _ Click( )　　　　Dimm(10) As Integer，n(10)As Integer　　　　For i=1 To 10　　　　　m(i) =i*i 　　　　Next i　　　　Call BTC(m，n)　　　　Print n(5)　　End Sub　　程序運(yùn)行后，單擊命令按鈕輸出結(jié)果為()。

A．0

B．2

C．10

D．25

D

在此題中定義了一個(gè)數(shù)據(jù)拷貝函數(shù)，用數(shù)組來保存數(shù)據(jù)，在主調(diào)過 程中，先用For…Next循環(huán)語句給m( )賦給，然后調(diào)用BTC函數(shù)，將m( )中的數(shù)據(jù)賦給n ( )，最后輸出n(5)。在數(shù)據(jù)拷貝函數(shù)中，用了函數(shù)LBound(oldCopy( ))和UBound(old- Copy( ))分別獲得數(shù)組的下界和上界，控制循環(huán)次數(shù)。用newCopy(i)=oldCopy(i)賦值語句，將m數(shù)組中的數(shù)據(jù)賦給n數(shù)組。因?yàn)閙(5)=25，數(shù)組n與數(shù)組m等價(jià)，所以n (5)也是25。