某VB程序的事件过程代码如下： 
Private Sub Command1_Click() 
Dim a As Integer
Dim s As String
s = "data:"
a =" Int(Rnd" * 90)
s =" s" + a 
Text1.Text = Str(a)
End Sub
程序运行后，单击命令按钮Command1，弹出如第8题图所示的错误提示信息，产生此错误的语句是（   ）

A．s = "data:"

B．a =" Int(Rnd" * 90)

C．s =" s" + a

D．Text1.Text = Str(a)

在Visual Basic的代码窗口中，语句Password.Caption= "a>b"中的Password是（  ）

A．对象名

B．属性值

C．属性名

D．类名

小明利用Visual Basic编写了“查找第二小的数”的程序，界面如图所示。程序随机产生50个范围在1～1000之间的随机整数，单击“查找”按钮，能够在标签Label1中显示第二小的数字。

(1)为了在列表框List1中加入随机产生的数字，小明在程序中写了语句“List1.AddItem Str(a(i))”，其中AddItem 是List1对象的__________(单选，填字母:

A．属性/

B．事件/

C．方法）。

(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim a(1 To 50) As Integer
Randomize
For i = 1 To 50
①___________
List1.AddItem Str(a(i))
Next i
If a(1) < a(2) Then

firstmin = a(1)

secondmin = a(2)

Else

firstmin = a(2)

secondmin = a(1)

End If
For i = 3 To 50
If a(i) < secondmin Then

②___________

secondmin = firstmin
firstmin = a(i)
Else
③____________
End If

End If

Next i
Label1.Caption = "第二小的数是" & Str(secondmin)
End Sub

下列关于CommandButton 控件的叙述正确的是( )

A．CommandButton 控件的Caption 属性决定按钮上显示的内容

B．单击VB应用程序中的按钮，则系统激活按钮控件对应的Change 事件

C．CommandButton 控件的name 属性决定按钮上显示的内容

D．以上都不对

下列VB 程序用于求2个正整数(均小于10000)的最大公约数:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
x=Val(Text1.Text) ‘第1 个正整数
y=Val(Text2.Text) ‘第2 个正整数
‘调用函数gcd
Text3.Text=Str(z)
End Sub
Function gcd(a As Integer,b As Integer) As Integer
Do While a <> b
If a>b Then a=a-b Else b=b-a
Loop
gcd=b
End Function
方框中的正确语句是(  )

A．z=gcd

B．z=gcd(a,b)

C．z=gcd(x,y)

D．z=gcd x,y