小天使舞蹈队编排一个舞蹈。该舞蹈要求人数为偶数，其中 1 位同学领舞，其站位始终不变，舞蹈队形
变化时，其余同学按逆时针顺序移动站位。我们把所有跳舞的同学从领舞开始依次编为数字 1～n（n 为偶 数），然后把队伍编号按 U 形走向分成两列，即得到第一次队形。从第二次队形开始，固定编号 1（领舞），
其余编号均按逆时针方向移动一个位置，即为该次队形；以后各次队形以此类推，直到除领舞外的所有同学
按逆时针转完一圈为止。
例如，节目人数为 6 时队形变化情况如下：
小嘉为此编写了一个 VB 程序，功能如下：在文本框 Text1 中输入跳舞的同学 n（n 为偶数），单击“队形
变化”按钮 Command1，在列表框 list1 中输出每次变化后的队形。程序代码如下，运行效果如图所示。
Private Sub Command1_Click() Dim a(1 To 20) As String
Dim result As String, t As String
Dim n As Integer, i As Integer, j As Integer n = Val(Text1.Text)
For i = 1 To n
①
Next i
For i = 1 To 
result = " "
List1.AddItem "第" & Str(i) & "次：" For j = 1 To n \ 2
result = a(j) + " " + a(n – j + 1 ) List1.AddItem result
Next j
②
For j = n To 3 Step -1 a(j) = a(j - 1)
Next j
a(2) = temp
Next i End Sub
请回答下列问题：
