有如下Visual Basic程序段：
m = a(1)
i =" 2"
Do While i <= 10
If m < a(i) Then m = a(i)
i =" i" + 1
Loop
该程序段执行后，变量m中存储的是（   ）

A．a(1)至a(10)中的最大值

B．a(1)至a(10)中的最小值

C．a(2)至a(10)中的最大值

D．a(2)至a(10)中的最小值

在数组元素a(1)到a(5)中查找键值为key的数，其查找算法的VB程序段如下：
Dim a(1 To 5) As Integer
Dim Key As Integer
Private Sub Command1_Click()
t＝0
For i＝1 To 5
If ____①____ Then
t＝i
Exit For ’②
End If
Next i
Print t
End Sub
Private Sub Form_Load()
’此过程用于对数组a和查找键Key进行赋初值，代码略
End Sub
(1)该程序段中所用的查找算法是_____________________________________。
(2)在程序①划线处，填入适当的语句或表达式，把程序补充完整：程序中①划线处应填入_____________________________________________。
当数组元素a(1)到a(5)中存储的数据为(2，5，1，9，5)，查找键Key为5时：
(3)该程序运行结束，t的值是_____________________________。
(4)如果将②所标记的Exit For语句删除，该程序运行结束时，t的值是________。

下列程序的功能是在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 ___________
Next i
End Function
Private Sub Command1_Click()
n = ________________
For a1 =" 2" To n
For a2 =" a1" To n
For a3 =" a2" To n
If _________________ 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

一次运动会上，某组6位选手的百米成绩(单位：秒)分别是“14.1、12.3、11.2、14.8、13.9、11.0”，若使用选择排序法将该组的成绩按第一名、第二名、第三名……的顺序排序，则第一次交换数据后的顺序是（）

A．14.8 14.1 12.3 11.2 13.9 11.0

B．11.0 12.3 11.2 14.8 13.9 14.1

C．14.8 12.3 11.2 14.1 13.9 11.0

D．11.0 14.1 12.3 11.2 14.8 13.9