s = "ERROR:Divisor must not be zero!"

flag = False  :  m = 0

For i = 1 To Len(s)

ch = Mid(s, i, 1)

If ch >= "a" And ch <= "z" Then

If Not flag Then

m = m + 1  ： flag = True

End If   

Else

flag = False

End If  

Next i 

Text1.Text=Str(m)

    key=Val(Text1．Text)

    n=0：i=1：j=7

    flag=False

    Do While i<=j And flag=False

        n=n+1

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

        If a(m)=key Then flag=True

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

    Loop

If flag=True Then

Text2 Text=“在第”＆ Str(m) &“个。”

    Else

        Text2．Text=“未找到。”

End If

数组元素a(1)到a(7)的值依次为“89，72，68，45，23，19，17”，文本框Text1中输入的值是19，执行该程序段后，下列变量的值不正确的是（   ）

i=1 : j=8 : t=0

key=Int(Rnd()*7)+14

Do While i<=j

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

   t=t+1

 if a(m)=key Then

      Exit Do else

      If a(m)>key Then  j=m-1

Else  

         i=m+1

End if

   End if Loop

数组元素 a(1)到 a(8)的值依次为“2,11,14,15,18,19,20,22”，该程序段运行结束后，变量t的最大值可能是（  ）

Dim a(1 To 6)As Integer, I AS Integer, maxi As Integer

a(1)=12：a(2)=8：a(3)=14：a(4)=13：a(5)=12：a(6)=11

Maxi=1

For i=2 To 6

If a(i)>a(maxi)Then maxi=i

Next i

a(1)=a(1)+a(maxi)：a(maxi)=a(1)-a(maxi)：a(1)=a(1)-a(maxi)

执行该程序段后，数组元素a(1)~a(6)的值是（  ）

i=1: j=8: t=0

key=int(Rnd( )*7)+14

Do While i<=j

    m=int((i+j)/2)

    t=t+1

    if a(m)=key Then

        Exit Do

    Else

        if a(m)>Key Then

            j=m-1

        Else

            i=m+1

        End if

    End if

Loop

数组元素a(1)到a(8)的值依次为“2,11,14,15,18,19,20,22”，执行该程度段后，变量t的最大值可能是（    ）