下列VB程序的功能是：在文本框Text1中輸入城市名字，在文本框Text2中輸入空氣指數(shù)，單擊“輸入”按鈕，則將內(nèi)容添加到列表框List1中；單擊“排行”按鈕時(shí)，在列表框List2中將顯示空氣質(zhì)量排名、城市以及空氣質(zhì)量等級(jí)．質(zhì)量等級(jí)標(biāo)準(zhǔn)為：空氣指數(shù)0-50為優(yōu)，51-100為良，101-200為污染，201及以上為重污染．程序運(yùn)行界面如圖所示．

Dim a（1To 1000）As String,b（1To 1000）As Integer,n As Integer
Private Sub Form_Load （　?。?br />n=1
End Sub
Private Sub Command1_Click（　?。?br />If Text1．Text＜＞““And Text2．Text＜＞““Then
a（n）=Text1．Text
b（n）=Val（Text2．Text）
      ①
List1．AddItem s
②
Text1．Text=““
Text2．Text=““
End If
End Sub
Private Sub Command2_Click（　?。?br />For i=1To n-1
For j=③Step-1
If b（j）＜b（j-1）Then
k=a（j）：a（j）=a（j-1）：a（j-1）=k
k=b（j）：b（j）=b（j-1）：b（j-1）=k
End If
Next
Next
For i=1To n-1
If b（i）＜=50Then
d=“優(yōu)“
ElseIf b（i）＜=100Then
d=“良“
ElseIf b（i）＜=200Then
d=“污染“
Else
d=“重污染“
End If
s=“第“& i &“名“&“：“& a（i） &“：“& d
List2．AddItem s
Next
End Sub
（1）大括號(hào)處的程序采用的排序算法是

冒泡排序法

冒泡排序法

（2）加框處①有錯(cuò)，應(yīng)該為

s=a（n）&“：”&b（n）

s=a（n）&“：”&b（n）

（3）②處應(yīng)填寫

n=n+1

n=n+1

（4）③處應(yīng)填寫

n to 2

n to 2

．