統計學中的“中位數”是這樣的一種數：一組數據里的一半的數據比它大，而另外一半數據比它小。計算一組數據的中位數的方法是：把所有數據按照非升的次序排列。如果數據的個數是奇數，則中間那個數就是這組數據的中位數；如果個數是偶數，則中間兩個數的算術平均值是中位數。
小詩收集了全市部分教職員工的工資數據，設計了找中位數的程序如下。小詩收集的人員工資數據放在了 Access 數據庫中。小詩的程序在窗體加載時讀出了所有人員的數據：姓名放在數組a中，對應的工資放在數組b中，數據總記錄數放在n中。單擊按鈕 Command1后先以工資按非升的次序排序，然后找出中位數。
（1）要使程序運行時，從數據庫中讀取所有人員的數據，可在事件過程中添加相關代碼。

B

B

（單選，填字母：A．Form1_load/B．Form_load/C．Form1．Caption）

Dim a（1 To 1000）As String
Dim b（1 To 1000）As Single
Dim n As Integer
‘數據庫讀取所有人員的數據代碼略
Private Sub Command1_Click （　　）
Dim i As Integer,j As Integer,k As Integer
Dim tmp1 As Single,tmp2 As String
Dim median As Single
For i=n To 2 step-1
k=i
For j=i-1 To 1 step-1
If  Then
k=j
End If
Next j
If k＜＞i Then
tmp1=b（k）：b（k）=b（i）：b（i）=tmp1
tmp2=a（k）：a（k）=a（i）：a（i）=tmp2
End If
Next i
For i=1 To n
List1．AddItem Str（i） &““& a（i） &““& Str（b（i））
Next i
If n Mod 2=0 Then
median=②          Else
median=b（n\2+1）
End If
Label1．Caption=“中位數是：“& Str（median）
End Sub
（2）將橫線處代碼補充完整。
（3）程序代碼中，波浪線

b（j）＜b（k）

b（j）＜b（k）

處有錯，請改正。
（4）如圖所示，數據庫中一共有個教職員工。