If x>100 then

      Y=12

        ①       x>60 then

      Y=8

     Else 

y=5

        ②   

该程序段中，①处填写的内容为{#blank#}1{#/blank#}；②处填写的内容为{#blank#}2{#/blank#}。

Private Sub Command1_Click()

  Dim a(0 To 5) As Integer

  Dim i As Integer               ’①

  a(0) = 1                      '②

  For i = 1 To 5

    a(i) = 2 * a(i - 1) + 1          '③

  Next i

  Text1.Text = Str(a(6))         '④

End Sub

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))

Dim a(1 To 10) As Integer

a(1)=2: a(2)=18: a(3)=10: a(4)=34: a(5)=16

a(6)=7: a(7)=37: a(8)=6: a(9)=15: a(10)=15

c=0: x=0: t= 1

For i=1 To 10

    a(i)=a(i)*t

    c=c+a(i)

    If c>0 Then x=x+1

    t=-t

Next i

Text1.Text=Str(x)

则程序运行后Text1中显示（  ）