[填空题] 在窗体上画一个名称为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=Ubound(b)　　For i=1 To n / 2　　t=b(_考试资料记录