i=1：j=8：s="  "  ‘数组a下标为从1到8

  key=Val(Text1．Text)

  Do While i<=j

    m=(i+j)＼2

    s=s+Str(m)

    If a(m)=key Then Exit Do

    If a(i)<a(m)Then

      If key>=a(i)And key t<a(m)Then j=m-1Else i=m+1

    Else

      If key>a(m)And key<=a(j)Then i=m+1 Else j=m-1

    End If

  Loop

  Text2．Text=s

数组元素a（1）至a(8)的数据分别为“3，4，5，6，7，8，1，2”，运行该程序段，若在文本框Text1中输入1，则在文本框Text2中显示（  ）

  Dim i As Integer，j As Integer，flag As Boolean，t As Integer

  i=1．j=6：flag=False：key=56

  Do While i<=i

    m=i+(j-i)＼2

    If a(m)<=key Then

       i=m+1

    Else

       j=m-1：flag=True

    End If

  Loop

  If flag Then t=i Else t=-1

数组元素a(1)到a(6)的值依次为10，18，25，30，45，56。该段程序运行后，t的值是（  ）

  Function search(key As Integer)As String

    Dim pos As Integer，i As Integer，j As Integer

    Dim nc As String

    i=1：j=6：nc=“”

    Do While i<=j

        m=Int((i+j)／2)

        nc=nc+Str(m)

        If d(m)=key Then

            Exit Do        ‘Exit Do表示退出Do While循环

        ElseIf key<d(m)Then

             j=m-1

        Else

             i=m+1

    End If

      Loop

      search=nc

    End Function

数组元素d(1)到d(6)的值依次为“23，34，45，65，78，98”，则下列说法正确的是 （  ）

  Dim a(1 To 10) As Integer

  Dim i As Integer, j As Integer, m As Integer

  Dim key As Integer

  i = 1: j = 10: key = Val(Text1.Text)

  Do While i <= j

    m = (i + j) \ 2

    If key < a(m) Then

      j = m - 1

    ElseIf key > a(m) Then

      i = m + 1

    Else

      Do While m > 1

         If a(m - 1) = key Then

          m = m - 1

         Else

          Exit Do

         End If

      Loop

      Exit Do

    End If

  Loop

数组中a(1)到a(10)依次为“1，1，2，3，3，3，3，4，4，4”，若在文本框Text1中输入值3，经上述程序段执行后变量m的值为（  ）