s = 0

    For i = _____ To 2

    s = s + i

    Next i

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

解决该问题的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

下列Visual Basic程序的功能是将K进制(k<=10)数x转换成十进制数。界面如图所示，在文本框Text1中输入数制k，在文本框Text2中输入数x，单击"转换"按钮（Command1）后，在标签Label4中输出转换的结果。

解决此问题的算法流程图如图所示，相应的Visual Basic程序如下：

Private Sub Command1_Click()

Dim b As Long, i As Integer, k As Integer, x As Long, t As Integer

b = 0: i = 1

k = Val(Text1.Text)

x = Val(Text2.Text)

t = x Mod 10

    Do While      ①    

        b =       ②     

        x = x \ 10

        t = x Mod 10

        i = i + 1

    Loop

Label4.Caption = Str(k) + "进制数" + Text2.text + "转换成十制数为" + Str(b)

End Sub

在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：

Private Sub Command1_Click()

 Dim i As Integer

 Dim a(10)As Integer    ‘①

 For i=1 To 10    ‘②

  a(i)=Rnd* 100    ‘③

 Next i

 Label1.Caption=Str(a(i))    ‘④

End Sub

为了实现此算法，图中判断框①和处理框②处可填入的是（  ）