1. (2021高三上·浙江月考) 有VB程序段如下：

s = "United by Emotion"： s1 = "”

For i=1 To Len(s) Step 4

    c = Mid(s， i，1)

    If Asc(c) >= Asc("a") Then

        c = Chr(Asc(c) - Asc("a") + Asc("A"))

        s1=c+s1

    End If

Next i

程序运行后，s1的值是(     )