填空题
在窗体上画一个名称为Command1的命令按钮。然后编写如下程序：
Option Base 1
Private Sub Command1_Click1
Dim a(10) As Integer
For i=1 To 10
a(i)=i
Next
Call swap ( 2 )
For i=1 To 10
Print a(i);
Next
End Sub
Sub swap(b3 As Integer)
n=Ubound(b)
For i=1 To n / 2
t=b(i)
b(i)=b(n)
b(n)=t
4
Next
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……。请填空。