在VB中，下列函数返回值最大的是(    )

A．Sqr(9)

B．Abs(-3.2)

C．int(3.2)

D．Len("3.2")

对数组a中的n个元素进行排序，生成升序的数据序列，结果如下表所示：

a(1)	a(2)	a(3)	……	a(n-2)	a(n-1)	a(n)
17	39	48	……	79	79	100

 
实现上述功能的VB程序如下，但加框处代码有错，请改正。
Private Sub Command1_Click()
Const n = 8
Dim a(1 To n) As Integer, left As Integer, right As Integer, m As Integer
Dim i As Integer, j As Integer, t As Integer

’读取一组数，存储在数组a中，代码略

 For i = 2 To n

    left = 1

    __________________

    Do While left <= right

m = (left + right) \ 2

If a(i) < a(m) Then right = m - 1 Else left = m + 1

    Loop

__________________

    t = a(i)

For j = i To m + 1 Step -1

a(j) = a(j - 1)

    Next j

    a(m) = t

Next i

’输出排序结果，代码略
End Sub

小王基于选择排序算法编写了一个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

以下算法中，需要通过多重循环一一列举出解决问题的所有可能解，并在逐一列举的过程中，检验每个可能解是否是问题的真正解；而需要从实际问题中归纳出数学表达式，就此求出解；这两个算法分别是（ ）

A．穷举法、公式法	B．循环法、递归法
C．查找法、函数法	D．枚举法、解析法

某数组有8个元素，依次为500、419、352、350、300、200、180、100，若采用顺序查找法在该数组中查找数据300，需要查找的次数是（  ）

A．1

B．3

C．4

D．5