填空题

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

【参考答案】

a()
UBound(b)或10
n=n-1