![[填空题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10)As In](http://www.mshxw.com/aiimages/31/257665.png "[填空题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10)As In")
[填空题] 在窗体上画一个名称为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)的值互换。请填空。
参考答案：
【13】 a【14】 10【15】n=n-1问题解析:
[评析] Option base语句在模块级别中使用，用来声明数组下标的起始值(缺省值为0)。子过程利用语句加以调用，使子过程成为一个独立的语句，其形式为：子过程名[参数列表]或Call子过程名[参数列表]。题目要求将数组中的10个数逆序存放，也就是首尾两两交换，循环次数应为5次，在交换了a(1)与a(10)，应将n的值减1，再将a(2)与a(9)进行交换，依此类推。
