有如下VB程序段：

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" And c<="9"Then

        t=t*10+Val(c)

    Else

        s2=s2+Mid(pwd,t Mod 8+1,1)

    End If

Next i

Text2.Text=s2

运行该程序段，在文本框Text1中输入“20B13A8”，文本框Text2输出的是（   ）

A、hY

B、YE

C、YE7

D、Hya