实现上述功能的程序如下，请回答下列问题：

Private Sub Com1_Click( )  

Dim s As String

Dim flag As Boolean

Dim n As Integer， i As Integer

  s = Text1.Text

  _________     ‘①

  flag = True

  i = 1

  Do While i <= n \ 2

    If  Mid(s， i， 1) < >________________ Then      ‘②

       flag = False

       Exit Do       '退出Do循环

    End If

    i = i + 1

  Loop

  If flag Then

     Label2.Caption = s + "是回文字符串"

  Else

     Label2.Caption = s + "不是回文字符串"

  End If

End Sub

i=1: j=n

Do While i <=j

  m=(i+j) \ 2

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

  Else

   j=m-1

  End If

Loop

那么执行该程序后，下列说法正确的是（  ）

i=1: j=10: flag=True: cs=0

Key=Int(Rnd()*10)+28

Do While i <=j And flag=True

 m=(i+j) \ 2 : cs=cs+1

 If a (m)=Key Then

  flag=False

 Else If a(m) < Key Then

  i=m+1

 Else

  j=m-1

 End If

Loop

数组元素a(1)到a(10)依次是3 10 17 23 27 30 35 40 45 50，变量cs的值可能是（  ）

i=1:j=7:x=“high”

Do While i <=j

  m=(i+j)\2

  If a(m)=x Then Exit Do

  If a(m) > x Then

    j=m-1

 Else

   i=m+1

 End If

Loop

执行完上述代码后，根据最终变量值判断下列表达式，其中成立的是（  ）

key = Val(Text1.Text)

i=1:j=n

Do While i<j

    m=(i+j)\2

    If  Then

        i=m+1

    Else

    End If

Loop

If a(i)=key Then Label1.Caption =Str(i) Else Label1.Caption ="找不到"

上述程序段两个方框处的语句分别为（  ）