当输入的运算符不是加、减、乘、除四种运算符时，则输出“运算符不正确”；当进行除法运算时，如果除数为0，提示输出“除数不能为零”。相应的Visual Basic程序如下，在①和②划线处，填入合适的语句或表达式，把程序补充完整。

Private Sub Command1_Click（）

    Dim a As Single, b As Single, ch As String

    a = Val(Text1.Text)

    b = Val(Text2.Text)

             ①      

    If ch = "+" Then

        Text4.Text = Str(a + b)

    ElseIf ch = "*" Then

        Text4.Text = Str(a * b)

    ElseIf ch = "-" Then

        Text4.Text = Str(a - b)

    ElseIf ch = "/" Then

        If  ②  Then Text4.Text = Str(a / b) Else Text4.Text = "除数不能是零"

    Else

                 ③     

    End If

End Sub

a(1)=2

For i=2 to 7

a(i)=a(i-1)*2-1

Next i

i = 1 : j = 7

Do While i <= j

m =（i + j）\ 2

If a（m）= Key Then Exit Do

If Key < a（m） Then j = m - 1 Else i = m + 1

Loop

若key的值为15，则程序执行结束后，j的值为（  ）

L = 0: R = 7: i = 1

Do While i < R

    If a(i) = 0 Then

        L = L + 1

        t = a(i): a(i) = a(L): a(L) = t i = i + 1

    ElseIf a(i) = 2 Then

        R = R - 1

        t = a(i): a(i) = a(R): a(R) = t

    Else

        i = i + 1

    End If

Loop

数组元素 a(1)到 a(6)的值依次为“2，0，2，1，1，0”。执行该程序段后，下列说法不正确的是（  ）

    a(1) = 1

    For i = 2 To 12

      a(i) = a(i - 1) + Int(Rnd * 2) + 1

    Next i

    Key = Val(Text1.Text)

    i = 1: j = 12: cnt = 1: flag = False

    Do While i <= j And flag = False

      cnt = cnt + 1

      m = (i + j + 1) \ 2

      If a(m) = Key Then

        flag = True

      ElseIf Key > a(m) Then

        i = m + 1

      Else

        j = m - 1

      End If

    Loop

程序运行后，下列说法正确的是（  ）