Question

一道VB题目求解答

Private Sub Command1_Click()
Dim a(5)
For i = 0 To 4
a(i) = i + 1
t = i + 1
If t = 3 Then
Print a(i)
a(t - 1) = a(i - 2)
Else
a(t) = a(i)
End If
If i = 3 Then a(i + 1) = a(t - 4)
a(4) = 1
Print a(i)
Next i
End Sub
问单击按钮后的结果，答案是1 2 3 1 4 1 ，可我不知道是怎么做出来的，有哪位高人能教教我，要详细点
能推前3个答案让我看看吗？

Answer 1

像这种题目你只能给I一步一步的赋值挨个执行看结果。

这么简单的问题还是一步一步来吧
找张纸记录。