2009年9月计算机等考二级VB模拟题及解析(4)

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

　　正确答案: 1.(a) 2.(UBound(b)) 3.(n=n-1)