[填空題] 在窗體上畫一個名稱為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=Ubound(b)

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 n=n-1

題目中，首先定義一個長度為10的一維數(shù)組，并給數(shù)組賦值為1～10的整數(shù)，接下來調(diào)用swap過程完成數(shù)組元素值的互換。由于swap過程的形參為數(shù)組，所以調(diào)用swap過程時傳遞的實參應(yīng)該是一個數(shù)組名，本題中[11]只能是a。在過程swap中，首先求得數(shù)組b的上界n，然后在for循環(huán)中作元素值的互換，循環(huán)第一次時，i=1，a(1)與a(n)互換；循環(huán)第二次時，i=2，應(yīng)該與數(shù)組倒數(shù)第二個元素值互換，以此類推，所以每循環(huán)一次n值應(yīng)減少1，即[12]為n=n-1。