For i = 5 To 4 Step -1

        k = i

        For j = 6 - i To 1 Step -1

           If a(j) < a(k) Then k = j

        Next j

        If i <> k Then

           t = a(i): a(i) = a(k): a(k) = t

        End If

    Next i

数组元素a(1)到a(5)的值依次为“41，66，70，83，31”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为（  ）

如数据25 54 8 54 21 排序过程如下(n=5):

待排序数据：【25】 54 8 54 21

i=2:【25 54】 8 54 21

i=3:【8 25 54】 54 21

i=4:【8 25 54 54】 21

i=5:【8 21 25 54 54】

程序产生10个-100~100之间的整数，从小到大排序后输出，运行结果如图所示：

实现上述功能的VB程序代码如下，但加框处代码有错，请改正。

Dim a(0 To 10) As Integer

Private Sub Command1_Click()’产生10个随机数放在数组a中

 Dim i As Integer

 For i = 1 To 10

    ‘①

  List1.AddItem Str(a(i))

 Next i

 End Sub

Private Sub Command2_Click()

 Dim i As Integer, j As Integer

 For i = 2 To 10

  a(0) = a(i)

  j = i - 1

  Do While a(0) < a(j)

    ‘②

   j = j - 1

  Loop

  a(j + 1) = a(0)

 Next i

 For i = 1 To 10

  List2.AddItem Str(a(i))

 Next i

End Sub

①处的代码修改为{#blank#}1{#/blank#}。

②处的代码修改为{#blank#}2{#/blank#}。

请回答下列问题：