1. (2019·浙江模拟) 【加试题】有如下VB程序段，该程序段运行后，在文本框Text1中显示的内容是（  ）

Dim a(1 To 5)As Integer

a(1)=1 : a(2)=2

For i=3 To 5

   a(i)=a(1)

   For j=i-1 To 2 Step -1

a(j)=a(j)＋a(j－1)

   Next j

Next i

Text1.Text=Str(a(3))