(9) 在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：

　　Option Base 1

　　Private Sub Command1_Click()

　　Dim a(10) As Integer

　　For i=1 To 10

　　a(i) =i

　　Next

　　Call swap ( 【13】 )

　　For i=1 To 10

　　Print a(i) ;

　　Next

　　End Sub

　　Sub swap(b() As Integer)

　　n= 【14】

　　For i=1 To n/2

　　t=b(i)

　　b(i) =b(n)

　　b(n) =t

　　【15】

　　Next

　　End Sub

　　上述程序的功能是，通過調用過程swap，調換數組中數值的存放位置，即a(1) 與a(10) 的值互換，a(2) 與a(9) 的值互換，……，a(5) 與a(6) 的值互換。請填空。

　　正確答案: 1.(a) 2.(UBound(b)) 3.(n=n-1)