[填空题] 下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2，完成下列程序。 Private Sub Backwarda() Di

[填空题] 下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2，完成下列程序。

Private Sub Backwarda()

Dim i As Integer,Tmp As Integer

For i=1 To 5

Tmp:a(i)

(7)

a(5-i)=Tmp

Next

End Sub

a(i)=a(5-i)

For循环内部的三行语句为标准的2变量对换的表达方式，首先用替代变量tmp保存a(i)，最后又把tmp赋值给a(5-i)，中间一行显然是a(i)=a(5-i)，进行赋值操作。