在窗体上画一个名称为Command1的命令按钮。然后编写如下程序: Option Base 1 Private Sub Command1_click() Dim a(10)As Integer For i=1 To 10 a(i)=1 Next call swap( [11] ) 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 [12] Next End sub 上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……。请填空。