①接收用户输入  ②比较用户的输入和待猜数是否相等，相等则输出“猜对”，否则转向①继续执行，直到猜对为止。能表示此过程的流程图是（    ）

s=“491053”

For i=1 To 3

n=Len(s)

k=1

For j=2 To n

If Mid(s， k， 1) >=Mid(s， j， 1) Then

K=j

Else

Exit For .Exit For表示退出循环

End If

Next j

s= Mid(s， 1， k-1) + Mid(s， k+ 1，n-k)

Next i

Label1.Caption =s

执行该程序段后，标签Label1中显示的值是（  ）

Dim a(1 To 10) As Integer, f(1 To 20) As Boolean

    'f数组各元素的初值设为False，代码略

    For i = 1 To 10

       t =int(rnd()*20+1)

       If Not f(t) Then

          a(i) = t:      ⑴     

          For j = i To 2 Step -1

             If    ⑵    Then

                tmp = a(j): a(j) = a(j - 1): a(j - 1) = tmp

             End If

          Next j

       Else

               ⑶    

       End If

    Next i

上述程序中3处下划线应填入的程序代码是（  ）