单选：下列程序的功能是：输入l0个整数。‘Private sub Command2_Click()Dim i，j，k，temp，arr(11)As

下列程序的功能是：输入l0个整数。‘Private sub Command2_Click()Dim i，j，k，temp，arr(11)As IntegerDimresult As StringFor k=1T0 10arr(k)=Val(InputBox(“请输入第”&k&”个数：”，”数据输入窗口”))Next ki=1 J=10DoTemp=arr(i)arr(i)=arr(j)arr(j)=tempi=i+1j=__________LoopWhileresule=””For k=1 To 10result=result&arr(k)&Chr(13)NextkMsgBoxresultEnd Sub横线处应填写的内容是（　　）。
A．J-i i<j
B．j+1 i<j
C．j+1 i>j
D．J-1 i>j