Dim a(l To 5) As Integer, i As Integer, c As Integer

a(l) = 2 : a(2) = 1 : a(3) = 3 : a(4)=4 : a(5) = 5

c=0

For i = 3 To 5

If a(i - 2) + a(i - 1) = a(i) Then c = c + 1

Next i

Textl. Text = Str(c)

该程序段运行后，文本框Textl中显示的内容是（   ）

Dim data(10) As Integer     ‘①

Dim n As Integer     ‘n表示总元素个数

Private Sub Command1_Click()

 Dim t As Integer

 t = Val(Text1.Text)

 For i = t To n-1

   ② 

 Next i

 n = n - 1

 For i = 1 To n

   ③ 

 Next i

End Sub

Private Sub Form_Load()

Dim i As Integer

n = 10

For i = 1 To n

  data(i) = i * 2

  List1.AddItem Str(data(i))

Next i

End Sub

小李根据上述描述，设计了一个统计所有同学信息各题得分率的算法。程序运行后首先在列表框list1显示信息技术各小题得分，单击“计算”按钮“command1”，在列表框list2显示信息各题的题号和得分率，在文本框text1输出所有同学的信息平均分（平均分=各题得分率*各题分值的和）。算法的VB程序如下，回答下列问题。

s="0923 Hangzhou Yayunhui"; t=""

for i in range(len(s)):

    j=s[i]

    if not j>="a" or j>"z":

        t=""

        t=j+t

print(t)

程序运行后，输出的内容是（    ）