鄭強(qiáng)收集了某月部分品牌電腦在某城市的銷售量，并設(shè)計(jì)了一個(gè)Visual Basic排序程序。程序運(yùn)行界面如圖所示，左邊列表框List1中顯示排序前數(shù)據(jù)，單擊“排序”按鈕Command1，在右邊列表框List2中顯示按銷售量從高到低排序后的結(jié)果。程序中數(shù)組a和數(shù)組b分別存儲(chǔ)品牌名稱和對(duì)應(yīng)的銷售量。

程序代碼如下：
Const n As Integer=10'n為品牌數(shù)
Dim a（1To n） As String'數(shù)組a用于存儲(chǔ)品牌名稱
Dim b（1To n） As Integer'數(shù)組b用于存儲(chǔ)銷售量
Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,c As Integer,t As String
For i=1To

①n-1

①n-1

For j=1To n-i
If

②b（j）＜b（j+1）

②b（j）＜b（j+1）

Then
c=b（j+1）：b（j+1）=b（j）：b（j）=c
t=a（j+1）：a（j+1）=a（j）：a（j）=t
End If
Next j
Next i
For i=1To n
List2．AddItem a（i）+““+Str（b（i））
Next i
End Sub
Private Sub Form_Load

（　?。?/div>

（　?。?/div>
'此過程用于對(duì)數(shù)組a和數(shù)組b進(jìn)行賦初值，并顯示在List1中，代碼略
End Sub
（1）解決此問題采用的算法是

冒泡排序

冒泡排序

。（填：選擇排序/冒泡排序）
（2）在程序①和②橫線處填入適當(dāng)?shù)恼Z句或表達(dá)式，將程序補(bǔ)充完整：
程序中①橫線處應(yīng)填入

n-1

n-1

。
程序中②橫線處應(yīng)填入

b（j）＜b（j+1）

b（j）＜b（j+1）

。