郑均收集了某公司生猪生长各阶段的产肉比数据，他设计了如下Visual Basic程序进行数据处理．程序运行界面如图所示，左边列表框List1中显示生猪生长的各阶段编号及对应的产肉比，单击“排序”按钮Command1后，右边的列表框List2中显示按产肉比从高到低排序后的数据．所收集到的不同生长阶段编号和对应的产肉比数据已分别保存在数组a和数组b中．

排序部分程序如下：
Dim a（1To 10）As String′数组a用于存储阶段编号
Dim b（1To 10）As Single′数组b用于存储产肉比
Private Sub Command1_-Click （　　）
Dim i As Integer,j As Integer,k As Integer,t As Single,s As String
For i=1To 9
k=i
For j=i+1To 10
If ① Then k=j
Next j
If k＜＞i Then
s=a（i）：a（i）=a（k）：a（k）=s
t=b（i）：②：b（k）=t
End If
Next i
For i=1To 10
List2．AddItem a（i）+””+Str（b（i））
Next i
End Sub
Private Sub Form Load （　　）′此过程用于对数组a和数组b进行赋值，并显示在List1中，代码略
End Sub
（1）解决此问题采用的算法是

选择排序

选择排序

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

b（k）＜b（j）或b（k）＜=b（j）

b（k）＜b（j）或b（k）＜=b（j）

．
程序中②画线处应填入

b（i）=b（k）

b（i）=b（k）

．