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

Option Base 1

Private Sub Commandl_click()

Dim a(10)As Integer

For i=l T0 10

a(i)=1

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

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