填空题

在窗体上画一个名称为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)的值互换。请填空。