n = 10

Text1.Text = ""

  For i = 1 To 5

    For j = n To i + 1 Step -1

      If a(j) < a(i) Then

        temp = a(j): a(j) = a(i): a(i) = temp

      End If

    Next j

  Next i

  For i = 1 To 10

      Text1.Text = Text1.Text + Str(a(i))

  Next i

数组元素a(1)到a(10)的值依次为“965,155,195,444,106,734,172,983,898,360”，执行该程序段，文本框Text1中显示的是（   ）

Private Sub Command1_Click()

Dim a(1 To 100) As Integer

x = Val(Text1.Text)

y = Val(Text2.Text)

For i = 1 To 100

     (1)

  List1.AddItem Str(a(i))

Next i

For i = x To y - 1

  k = i

  For     (2)

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

  Next j

  If k <> i Then

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

  End If

Next i

For i = x To y

  List2.AddItem Str(a(i))

Next i

End Sub

⑴{#blank#}1{#/blank#}  ⑵{#blank#}2{#/blank#} 

num = 0

  For i = 1 To 3

    For j = 8 To i + 1 Step -1

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

         temp = a(j): a(j) = a(i): a(i) = temp

num = num +1

      End If

    Next j

  Next i

数组元素a(1)到a(8)的值依次为“25,44,16,34,57,25,34,60”，执行该程序段，变量num的值是（  ）

For i=1 To 3

 For j=i To 5

  If a(j) > a(j+1) Then

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

  End If

 Next j

 List1.AdcIItem Str(a(i))

Next i

a(1)到a(6)的初始值依次为“8 6 5 7 9 3 ”，经过该程序段“加工”后，列表框List1中显示的是（  ）

If temp>=a(n) Then

    a(n+1)=temp

Else

    j=n

    Do While j>=1 And temp<a(j)

        j=j-1

    Loop

End If

要使程序实现上述功能，则方框①②中的语句分别是（   ）