如果一个三位正整数等于它的每个数字的立方和，则此数称为“水仙花”数（如：153=1^3+5^3+3^3）。 下列程序用于求出 100-999 之间的所有“水仙花”数。
（1）设计下列程序界面时，在窗体上添加 List1 对象，可使用下图所示 的“控件工具箱”中的 （填写相应编号）。

（2）VB 程序如下： Private Sub Command1 Click（）
Dim m As Integer， n As Integer
Dim a As Integer，b As Integer,c As Integer For m =" 100" To 999
a =" Int(m/100)" b = ①   c= ②   n=a^3+b^3+c^3
If  ③ Then List1.AddItem Str(m) Next m
End Sub 在程序①、②、③划线处，填入适当的语句或表达式，把程序补充完整:
程序中①划线处应填入 。程序中②划线处应填入 。程序中③划线处应填入   。
（3）该程序是 算法。（选填：枚举/解析）

有如下VB程序段：

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

A．okaus

B．suako

C．okus

D．suko

执行程序后，a数组各元素是（  ）
Dim a(1 To 7) As Integer
a(1) = 14: a(2) = 15: a(3) = 0: a(4) = 11: a(5) = 13: a(6) = 21: a(7) = 17
i = 6: flag = True
Do While i > 1 And flag
If a(i) Mod 3 = 0 And a(i) <> 0 Then
t = a(i): a(i) = a(i + 1): a(i + 1) = t
ElseIf a(i) = 0 Then
flag = flase
ElseIf a(i + 1) Mod 2 = 1 Then
a(i) = Abs(a(i) - a(i + 1))
End If
i = i - 1
Loop

A．14,0,15,4,17,13,21	B．14,15,0,11,4,17,21
C．15,14,0,11,4,17,21	D．14,15,0,11,13,4,17

在窗体上画一个名称为Label1的标签,然后编写如下事件过程，程序运行后,单击窗体,在标签中显示的内容是（   ）
Private Sub Form_Click(）
Dim arr(1 to 10, 1 to 10） As Integer
Dim i As Integer, j As Integer
For i =" 2" To 4
For j =" 2" To 4
arr(i, j） =" i" * j
Next j
Next i
Label1.Caption =" Str(arr(2," 2）+ arr(3, 3））
End Sub
(

A．12

B．13

C．14

D．15

求1，100内的所有能被7整除的数。

在流程图的空白处应填入 ________   。