题目

对输入字符串中重复字符进行压缩，例如：字符串“aaabbc”压缩后就成为“3a2b1c”， 实现该功能的 VB 程序段如下： s = Text1.Text: c = 1 For i = 2 To Len(s)     If  Then         c = c + 1     Else         s1 = s1 + Trim(Str(c)) + Mid(s, i - 1, 1)      ‘Trim函数用于移除字符串两侧的空字符         End If Next i s1 = s1 + Trim(Str(c)) + Mid(s, i - 1, 1) 上述程序段两个方框处的语句分别为：（    ） A . Mid(s, i, 1) = Mid(s, i - 1, 1) c = 0 B . Mid(s, i, 1) = Mid(s, i - 1, 1) c = 1 C . Mid(s, i, 1) = Mid(s, i + 1, 1) c = 0 D . Mid(s, i, 1) = Mid(s, i + 1, 1) c = 1 答案：B

查看本题答案和解析