小强在双十一购物期间忘记了支付宝账户密码，但他急用支付宝进行转账，请你帮他尽可能找回密码。他只记得自己密码的一些零星信息：
①密码是六位数字，前面两位为59；②最后两位数字相同；③能被12和38整除。
程序界面如图1所示，单击 “帮助找回密码”按钮（Command1）后，可能的密码显示在列表框List1中。

图1   图2
（1）应用程序界面设计时，为添加“ List1”对象，应使用图2所示的“控件工具箱”中的________（填写相应编号）。
（2）请根据题意将解决此问题的相应程序补充完整。
Private Sub  Command1_click ()   
Dim x As Integer, s As Long,
Dim y As Integer, i As Integer
For i = 0 To 9999
S = 590000 + i
If ①________  Then
x= s mod 10
y = ②________
If x = y Then
List1.AddItem Str(s)
End If
End If
Next i
End Sub
（3）该模块采用的算法是（_____）

A．枚举

B．查找

C．排序

D．解析

有如下VB程序段：
For i =" 1" To 3
For j =" 5" To i Step -1
If a(j) < a(j + 1) Then
k =" a(j):" a(j) =" a(j" + 1): a(j + 1) = k
End If
Next j
List1.AddItem Str(a(i))
Next i
数组元素a(1)到a(6)的数据依次为“1，5，7，6，9，3”，经过该程序段加工后，列表框list1中显示的内容是：

A．9、7、6

B．1，3，5

C．9、7、6、1、5、3

D．9，7，6，5，3，1

下列程序段运行后，变量s的值是（ ）。
Dim s,k as integer
s = 0
For k =___1___To 50
s =" s" + 2
Next  k

A．1

B．2

C．50

D．100

在Visual Basic中,若x表示能被5整除的正整数,则下列逻辑表达式的值一定为真的是(　　)

A．x / 5=0

B．x Mod 5=0

C．Int(x\5)=0

D．5 Mod x=0

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

当输入a、b、c的值分别为5、2、8时，该算法的输出结果为（ ）

A．8

B．2

C．5

D．7