10.鄭均收集了某公司生豬生長各階段的產肉比數據,他設計了如下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)解決此問題采用的算法是