问题详情

窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1 Click() Dim arr(5)As Integer ． For k=1 To 5 art(k)=k Next k prog art() For k=1 T0 5 Print art(k)； Next k End Sub Sub prog(a()As Integer) n=UBound(a) For i=n To 2 step-1 if a(j)<a(j十1)Then t=a(j)：a(1)=a(j+1)；a(j+1)=t End If Next j Next i End Sub 程序运行时，单击命令按钮后显示的是()。
A.12345
B.54321
C.01234
D.43210请帮忙给出正确答案和分析，谢谢！