（ 9 ）在窗体上画一个名称为 Command1 的命令按钮。然后编写如下程序：

Option Base 1

Private Sub Command1_Click （）

Dim a （ 10 ） As Integer

F or i=1 To 10

a （ i ） =i

Next

Call swap （ 【 11 】 ）

For i=1 To 10

Print a （ i ） ;

Next

End Sub

Sub swap （ b （） As Integer ）

n =U b ound （ b ）

For i=1 To n / 2

t =b （ i ）

b （ i ） =b （ n ）

b （ n ） =t

【 12 】

Next

End Sub

上述程序的功能是，通过调用过程 swap ，调换数组中数值的存放位置，即 a ( 1 ) 与 a ( 10 ) 的值互换， a ( 2 ) 与 a ( 9 ) 的值互换 ， …… 。请填空。