下列程序段执行后，文本框Text 1中显示的内容是（  ）

s=“QUOTES：keep on going never give up!”

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

Text 1.Text=Str(m)

A、5

B、6

C、7

D、21