1. (2019·金华模拟) 有如下VB程序段：

Dim s As String, i As Integer, n As Integer

Dim ch As String, ans As Integer

s= Text1.Text

n Len(s): ans=0

For i=1 To n

    ch =Mid (s, i, 1)

    ans =ans *2+ Val(ch)

Next i

Text2 Text ans

若程序运行后Tex2中显示的是“38”，则Text中输入的是（  ）