窗体上有一个名为Command1的命令按钮，并有下面的程序：

　　Private Sub Comand1_Click()

　　Dim arr(5) As Integer

　　For k=1 To 5

　　arr(k)=k

　　Next k

　　prog arr()

　　For k=1 To 5

　　Print arr(k)

　　Next k

　　End Sub

　　Sub prog(a() As Integer)

　　n=Ubound(a)

　　For i=n To 2 step -1

　　For j=1 To n-1

　　if a(j)< p>

　　t=a(j):a(j)=a(j+1):a(j+1)=t

　　End If

　　Next j

　　Next i

　　End Sub

　　程序运行时，单击命令按钮后显示的是（）

A．12345

B．54321

C．01234

D．43210