[填空題] 在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：

Option Base 1

Private Sub Command1_Click()

Dim a(10)As Integer

For i=1 To 10

a(i)=i

Next

Call swap (______)

For i=1 To 10

Print a(i)

Next

End Sub

Sub swap(b()As Integer)

n=______

For i=1 To n/2

t=b(i)

b(i)=b(n)

b(n)=t

______

Next

End Sub

上述程序的功能是，通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換。請?zhí)羁铡?/p>正確答案：

a() UBound(b) n＝n-1

結(jié)合下面的程序可知函數(shù)swap的形式參數(shù)是一個數(shù)組，結(jié)合題目易知應(yīng)該是a數(shù)組。 UBound(arrayname[,dimension])函數(shù)是返回指定數(shù)組維數(shù)的最大可用下標(biāo)。由于要將整個數(shù)組的元素進(jìn)行諸如a(1)和a(10)的對換，故必須要得其最大下標(biāo)。 For循環(huán)就是將數(shù)組中的元素進(jìn)行對換，由上知n中放的是數(shù)組的最大下標(biāo)，即最后一個元素的下標(biāo)，于是For循環(huán)中的循環(huán)變量i從1開始到n/2，利用中間變量t，將b(i)與b(n)進(jìn)行對換，由于是對應(yīng)對換的，故每對換一次n也應(yīng)該向前推進(jìn)一位，即n=n-1。