题目

有如下VB程序段： s1 = "2019GaoKao" For i = 1 To Len(s1)     ch = Mid(s1, i, 1)     If ch >= "0" And ch <= "9" Then         ch = Str((Val(ch)+1) Mod 10)         s2 = ch + s2     ElseIf ch >= "a" And ch <= "z" Then         ch = Chr(Asc(ch) - 32) s2 = s2 + ch     End If Next i 该程序运行后，s2的值是（     ） A . "A0A00213" B . "0213A0A0" C . "02130A0A" D . "0A0A0213" 答案：B

查看本题答案和解析