统计学中的“中位数”是这样的一种数：一组数据里的一半的数据比它大，而另外一半数据比它小。计算一组数据的中位数的方法是：把所有数据按照非升的次序排列。如果数据的个数是奇数，则中间那个数就是这组数据的中位数；如果个数是偶数，则中间两个数的算术平均值是中位数。
小诗收集了全市部分教职员工的工资数据，设计了找中位数的程序如下。小诗收集的人员工资数据放在了 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）如图所示，数据库中一共有个教职员工。