有如下 VB 程序段:

For i = 1 To 6

  a(i) = Int(Rnd * 20) + 1: b(i) = i

Next i

For i = 1 To 5

  For j = i+1 To 6

    If a(b(i))>a(b(j)) Then

      t = b(j):   b(j) = b(i):   b(i) = t

    End If

  Next j

Next i

i = 1 : j = 6: s="" : Key = Val(Text1.Text)

Do While i <= j

  m = (i + j) \ 2

  If Key = a(b(m)) Then Exit Do

  If Key < a(b(m)) Then j = m - 1 Else i = m + 1

  s = s + Str(m)

Loop

Text2.Text = s

在文本框Text1中输入10，运行以上程序段后，文本框Text2中显示的内容为 3 5 4，则 a 数组中 a(1)到 a(6)各元素的值可能的是（    ）

A、11，6，4，13，18，15

B、4，5，8，19，10，17

C、2，11，7，6，3，18

D、9，2，11，21，5，16