[填空题] 在窗体上画一个名称为Command1的命令按钮，然后编写下列程序： Option Base_1 Private Sub Command1_Click() Dim a(10)As Int

[填空题] 在窗体上画一个名称为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(1)与a(10)的值互换， a(2)与a(9)的值互换，……，请填空。

参考答案：

a, Ubound(b), n=n-A

问题解析:

第一空考查的考点是有关数组作为函数参数的。本题中被调函数Swap的形参为数组b，故此与之匹配的实参必须是一个不带括号的数组名，在本题中只能是数组a。 第二空考查的考点是有关循环次数的。本题中要求数组逆置，循环次数应该是数组长度的一半。Ubound函数可以求数组的上界，由于是在被调函数中，所以数组名要使用形参数组名b。 第三空考查的考点是有关循环中的交换问题的。本题中每次循环b(i)均要和b(n)交换，而b(i)每次循环都要发生变化，每当i加1后，对应与之交换的n应该减1才符合题意。