题目

阅读下列程序代码： Dim s As String， c As StringDim i As Integer， n As Integer， p As Integers = Text1.Textn = Len(s)p = 1For i = 1 To n c = Mid(s， i， 1) If c >= A And c <= Z Then t = c + t Else t = Mid(t， 1， p - 1) + c + Mid(t， p， Len(t) - p + 1) p = p + 1 End IfNext i Text2.Text = t 如果文本框Text1中输入“ABCD@1234”，则文本框Text2中输出（ ） A . ABCD@1234 B . @1234ABCD C . @1234DCBA D . 1234@ABCD太阳系中，距离太阳最远的行星是：A．水星 B．土星 C．天王星 D．海王星