这八个是控件数组

如果只是想反序显示，交换Label1数组的内容即可
如果想让内部存储的数据也反序，那就交换数组a的元素，然后显示交换后的数组a
以交换数组a为例：
For i = 0 To 3
t = a(i)
a(i) = a(7 - i)
a(7 - i) = t
Next i

数组保持原顺序不动，在标签中反序输出的代码：
For i = 0 To 7
Label1(i).Caption = a(7 - i)
Next i

还是保持数组原顺序不动，但是不重新读取数组，只交换标签内容的代码：（可以实现点击一次反序，再点击一次还原顺序）
For i = 0 To 3
t = Label1(i).Caption
Label1(i).Caption = Label1(7 - i).Caption
Label1(7 - i).Caption = t
Next i
（这其实就是我在2楼给的代码，把a换成了标签而已）