s = 0

    For i = _____ To 2

    s = s + i

    Next i

若要使语句s = s + i执行2次，则循环变量i初值为（   ）

    m=1：k=1

    For i=2 To 10

      If a(i)<a(i-1)Then

    k=k+1

         If k>m Then m=k

       Else

         k=1

       End If

    Next i

    Text1．Text=Str(m)

  End Sub

执行该程序段，文本框Text1中显示的是 （  ）

解决该问题的VB程序段如下，在划线处填入正确的语句以实现功能。

Dim a(0 To 10) As Integer

Dim b(0 To 10) As Integer

n = 10

For i = 0 To 10

a(i) = 0

Next

a(1) = 1

b(1) = 1

For i = 1 To n

s = ″ ″

For j = 1 To{#blank#}1{#/blank#}

s = s + ″ ″'在s中加入一个空格

Next

For j = 1 To i

b(j) ={#blank#}2{#/blank#}

s = s + Str(b(j))

Next

Print s

For j = 1 To i

a(j) = b(j)

Next

Next