某协会进行钓鱼比赛，最后有十人进入决赛，录入员编制了如下Visual Basic程序，功能是根据成绩进行排序，程序中数组a保存所有参赛者的成绩，数组b保存此成绩对应的姓名，第i位参赛者的成绩保存在a（i）中，姓名保存在b（i）中。
程序界面如图所示，左边列表框List1中显示原始数据（成绩和相应的姓名），单击“排序“按钮（Command1），排序后的结果按成绩从高到低显示在列表框List2中。

解决此问题的算法流程图如图所示，排序部分的程序段如下：
Dim a（1To 10）As Single
Dim b（1To 10）As String
Private Sub Command1_Click （　　）
Dim i As Integer,j As Integer,k As Integer,x As Single,y As String
For i=1To 9
k=i
For j=i+1To 10
If ①            Then k=j
Next j
If k＜＞i Then
x=a（i）：a（i）=a（k）：②                       
y=b（i）：b（i）=b（k）：b（k）=y
End If
Next i
For i=1To 10
List2．AddItem Str（a（i））+““+b（i）
Next i
End Sub
Private Sub Form_Load （　　）
'此过程用于对数组a和数组b进行初始赋值，代码略
End Sub
（1）解决此问题的算法是

选择排序

选择排序

。（选填：冒泡排序 或 选择排序）
在程序①和②横线处，填入适当的语句或表达式，把程序补充完整：
（2）程序中①横线处应填入

a（j）＞a（k）

a（j）＞a（k）

。
（3）程序中②横线处应填入

a（k）=x

a（k）=x

。