有如下VB程序段: s = "PYTHON5678" For i = 1 To Len(s) ch = Mid(s, i, 1) If ch >= "0" And ch <= "9" Then k = (Val(ch) - 1) Mod (Len(s) - 4) + 1 s1 = Mid(s, k, 1) + s1 End If Next i Text1.Text = s1 程序执行完后,Text1 中显示的内容是( )
A . ONPY
B . YPNO
C . PNOH
D . HONP
答案:B