在Visual Basic 中，若x、y都是正整数且x能被y整除，则下列关系表达式值一定为真的是（   ）

A．x mod y =0

B．x<>y

C．x mod 2 =0

D．x/y=0

能得到一个大于等于20且小于50随机整数的VB表达式是（   ）

A．Int(rnd*50)-20

B．Int(rnd*30+20)

C．Int(rnd*31+20)

D．Int(rnd*30)+1

下列程序的功能是在text1中输入的自然数，分解为3个互不相同的质数（三个质数的和等于输入的自然数），并把分解产生的质数按升序顺序显示在左边的列表框中。例如，输入20，那么在列表框中会显示如下图所示结果。其中，上述界面中“分解”按钮的名称是“Command1”，程序中函数f(x)的功能是判断x是否为质数，如果是质数则返回值为true，否则返回false.

请在下列程序代码的基础上按照要求设计该程序, 完善程序中的划线部分。
Dim n As Integer, a1 As Integer, a2 As Integer, a3 As Integer
Function f(x) As Boolean
f = True
For i =" 2" To Sqr(x)
If x Mod i =" 0" Then _____( 1 )_____
Next i
End Function
Private Sub Command1_Click()
n = _______( 2 )_______
For a1 =" 2" To n
For a2 =" a1" To n
For a3 =" a2" To n
If _______( 3 )_______ And f(a1) And f(a2) And f(a3) Then
List1.AddItem (Str(a1) + " " + Str(a2) + " " + Str(a3))
End If
Next a3
Next a2
Next a1
End Sub
(1)
(2)
(3)

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


（1）应用程序界面设计时，添加“list1”对象用于显示可能的密码，应使用如图所示的“控件工具箱”中的______________（填写相应编号）
（2）解决此问题的相应程序如下，请根据题意将程序补充完整。
Private Sub  Command1_click ( )   
Dim x As Integer, s As Long, y As Integer, i As Integer
For i =" 0" To 9999
S =" 590000" + i
If ________①________  Then
x=" s" mod 10
y =" (s" Mod 100) \ 10
If x =" y" Then
_________②______     
End If
End If
Next i
End Sub

在VB中，表示代数式的表达式是

A．2*a+4*b^2/a+b	B．2*a+4*b^2/(a+b)
C．(2*a+4*b^2)/a+b	D．(2*a+4*b^2)/(a十b)

在VB中，x=10，则执行下列语句的结果是print  "a=";a

A．a=10

B．a=a

C．10

D．10=10

在VB中，x=16，执行语句x=sqr(x)后，变量x的值是

A．1

B．4

C．8

D．16

在 VB 中，下列程序段执行后，变量 s 的值是
s=1
For k="1" To 3
s=s+1
Next k

A．1

B．3

C．4

D．6

在VB中，表达式321+54的运算结果是

A．375

B．"375"

C．"32154"

D．321+54

有如下 VB 程序，它的输出结果是
S=0
For i="1" To 10
If i mod 2="0" Then S="S+i"
Next i
Print “S=”;S

A．S=0

B．S=25

C．S=30

D．S=55