map =“ 01234567890123456789012345”
tel = Text1.Text
For i = 1 To Len(tel)
c = Mid(tel, i, 1)
If c >=“ 0” And c <=“ 9” Then
s = s + c
ElseIf c >“ A” And c <=“ Z” Then
s = s + Mid(map, Asc(c) - Asc(“A”) + 1, 1)
End If
Next i
在text1 文本框中输入“hi,NICETOSEEYOU-2016”,程序执行完后s 的结果是( )