单选题
窗体上有一个名为Command1的命令按钮，并有下面的程序：
Private Sub
Command1_Click() Sub prog(a()As Integer)
Dim arr(5) As Integer
n=UBound(a)
For k=1 To 5
For i=n To 2 step-1
arr(k)=k
For i=1 To n-1
Next k
if a(j)＜a(j+1) Then
Prog arr()
t=a(j):a(j)=a(j+1)):a(j+1)=t
Fork=1 To 5
End
If
Print arr(k);
Next j
Next k
Next i
End Sub
End Sub
程序运行时，单击命令按钮后显示的是______。
- A.1 2 3 4
- B.5 4 3 2 1
- C.0 1 2 3 4
- D.4 3 2 1 0