填空题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
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(1-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
程序运行后，单击命令按钮，输出结果是______。