Dim i As Integer, c As String, s As String, t As Integer
Dim s2 As String, pwd As String
s= Text1.Text: pwd = "71zhYEAR":s2= ":t= 0
For i= 1 To Len(s)
c= Mid(s, i, 1)
If c>= "0" Andc <= "9" Then
t=t* 10 + Val(c)
Else
s2 = s2 + Mid(pwd, tMod8 + 1, 1)
End If
Next i
Text2.Text= s2
运行该程序段,在文本框Text1中输入“20B13A8",文本框Text2输出的是( )