有如下程序段: Dim s As String, ch As String Dim ansAs String, i As Integer s = Text1.Text For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= "A" And ch <= "Z" Then ch = Chr(asc(ch) + 3) ElseIf ch >= "a" And ch <= "z" Then ch = Chr(asc(ch) - 3) End If ans = ans + ch Next i Text2.Text = ans 运行时文本框Text1中输入“Tu5Mp4”,则文本框Text2中输出的内容是( )
A . Wx2Ps1
B . Wr5Pm4
C . WrPm1
D . Wx5Ps4
答案:B