有如下VB程序段：
s = "spring winter"：s1 = ""

n = Len(s)

For i = 1 To n \ 2

    If Mid(s, i, 1) > Mid(s, n - i + 1, 1) Then s1 = s1 + Mid(s, i, 1)

    Else

        s1 = Mid(s, n - i + 1, 1) + s1

    End If

Next i

Text1.Text = s1

执行该程序后，在文本框Text1中显示的是 （   ）

A、wprtnr

B、sptnnw

C、rtwprn

D、wntspn