有如下VB程序段：

flag=False: s="ShanShui2020！"

For i=1 To Len（s）

    ch=Mid（s，i，1）

If Not（ch>="0" And ch<="9"）And Not flag Then

        t=ch+t

    End If

    flag=Not flag

Next i

Text1.Text=t

执行完以上程序段后，文本框text1中的内容为（    ）

A、!uSaS

B、SaSu!

C、!22uSaS

D、ShanShui!