下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2个，
完成下列程序。
Private Sub Backward(a())
Dim i As Integer,Tmp As Integer
Fori=1 To5
Tmp=a(i)

a(5-i)=Tmp
Nexti
End Sub