小李忘记了密码箱上设置的三位数密码，于是他从“000”开始尝试，一直到成功打开密码箱为止。这种解锁方法采用的算法是（ ）。

A．解析算法

B．穷举算法

C．递归法

D．选择排序

设有n盏灯，放在一排。从1 到 n依次顺序编号。有 n个人也从1到n依次编号。第1个人（1号）将灯全部关闭，第2个人（2号）将凡是2的倍数的灯打开，第3个人（3号）将凡是3的倍数的灯做相反处理（该灯如果为打开的，则将它关闭，如关闭的将它打开），以后的人和3号一样，将凡是自己号数倍数的灯做相反处理。问当n个人操作后，哪几盏灯是亮的。（亮灯为0，关闭为1）
为了实现这一目标，完善下列程序，使之能完成该功能。
Private Sub Command1_Click()
Const n=20
Dim i As Integer,j As Integer
Dim a(1 To n) As integer
For j=1 To n
a(j)=0
Next j
For i=1 To n
For j=1 To n
If j Mod i=0 Then
______________ ‘(1)
End If
Next j
Next i
For j=1 To n
If ________ Then List1.AddItem  Str(j) ‘(2)
Next j
End Sub

某算法的部分流程图如下图所示：

执行该算法，下列描述正确的是(　　)

A．t←t＋2执行了4次

B．s≤35? 执行了4次

C．循环结构后，t的值为7

D．该算法体现了枚举算法思想

（加试题）下列VB程序的功能是：求得1000以内的所有水仙花数，并在list1中显示。水仙花数是指一个n位数（n）=3），它的每个位上的数字的n次幂之和等于它本身（例如：1^3+5^3+3^3=153）

Private Sub Command1_Click()
List1.clear
Dim a As Integer
For i = 1 To 1000
s = 0
l = Len(Str(i)) - 1
For j = 0 To l - 1
a = 1
s = s + a ^ 3
Next j
If i = s Then
List1.AddItem i
End If
Next i
End Sub
横线处应填写

A．i / 10 ^ j Mod 10	B．i \ 10 ^ j Mod 10
C．i \ 10 ^ (j Mod 10)	D．(i \ 10) ^ j Mod 10