下列关于添加"控件"的方法正确的是（）

A．单击控件图标，将指针移到窗体上，双击鼠标

B．双击工具箱中的控件，即在窗体上出现该控件

C．单击工具箱中的控件，将指针移到窗体上，再单击

D．用鼠标左键拖动工具箱中的某控件到窗体的适当位置

编写VB程序，实现如下功能：在文本框Text1中输入十六进制数，单击“转换”按钮Command1，在列表框List1中输出对应的十进制数，运行界面如图所示，程序代码如下。

（1）要调整Label1中的字体大小，可选择在属性面板中设置Label1的    。（单选，填字母：A.Caption / B.Font /

A．Height）

（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String, c As String, t As String
Dim i As Integer, b As Integer, ans As Long
Dim flag As Boolean
s =    ①
b = Len(s)
flag = True
ans = 0
For i =" 1" To b
c =" Mid(s," i, 1)
If c >= "0" And c <= "9" Then
ans =" ans" * 16 + Asc(c) - Asc("0")
ElseIf c >= "A" And c <= "F" Then
ans =" ans" * 16 +  ②
Else
③   '输入情况有误
Exit For
End If
Next i
If flag Then t =" Str(ans)" Else t ="输入有误!"
List1.AddItem s + "-->" + t
End Sub
（3）由上述算法可知，运行时在Text1框中输入“d8”，列表框List1中添加的条目为 。（单选，填字母：A. d8-->216/ B. d8-->输入有误!）

小王基于选择排序算法编写了一个VB程序，功能如下：在文本框 Text1中显示排序前的数据，单击“排序”按钮Command1，在文本框Text2中显示剔除重复数据后的升序排序结果。程序运行界面如图所示。

请回答下列问题
（1）要使程序运行后，命令按钮 Command1的 Caption属性值自动变为“排序”，可在_____（单选，填字母：

A．Text1 Cick()/

B．Fom_Load()/

C．Command1_Cick()）事件过程中添加语句：Command1 Caption=“排序”。

（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n = 10
Dim a(1 To n) As Integer
Private Sub Form Load ()
‘数组初始化,生成1~20之间的随机整数并赋值给数组a
Randomize '随机数初始化
For i=1 To n
a(i) =①_______ 
Next i
End Sub
Private Sub Command1 _Click()
Dim 1 As Integer, j As Integer, t As Integer
Dim bottom As Integer
bottom = n
For i=1 To bottom -1
For j = bottom To i + 1 Step -1
If ②_______ Then
t = a(j):a(j) = a(i):a(i) = t
ElseIf a(j) = a(i) Then
③_______
bottom = bottom -1
End if
Next j
Next i
Text2. text = ""
For i=1 to bottom
Text2. Text = Text2. Text + str(a(i))
Next i
End sub

某“交换两变量值”的应用程序及VB设计界面分别如图（图中所有对象属性均为默认值）所示，下列说法正确的是（   ）

①窗体中所有对象的属性值只能在设计时修改
②窗体中有10个对象，分别属于4个类
③窗体中显示的 “Label1”是对象的某一属性值
④窗体中显示的 “Command1”对象属于Command Button类

A．①③

B．②④

C．②③④

D．①③④

有如下 VB 程序段：
Dim p As Integer, q As Integer, s As Integer, t As Integer
p = Val(Text1.Text)
t = 0
For q = p+ 1 To 2 * p
s = (p * q) Mod (q - p)
If s = 0 Then
t = t+ 1
End If
Next q
Label1.Caption = Str(t)
该程序段运行时，在文本框T extl中输入8 , 则在标签Labell中显示的内容是（）

A．3

B．4

C．5

D．6