学进去

现要编写一个程序，对每个班级的同学生成考试座位号，规则如下：先按成绩从高到低排序，如果成绩相同，学号在前的学生座位号在前，最后输出每个同学的座位号。小王和小李采用不同的方法实现了上述算法。请仔细比较两位同学的代码的不同之处，并完成相关代码的填空。

Dim xm (1 To n) As String,xh(1 To n) As String
Dim cj(1 to n)As Integer
Private Sub form_load()
'读取相关数据表，把姓名、学号、成绩分别存储到数组xm、xh、cj中，并在List1中显示，代码略
End Sub
Private Sub Com1__Click()'小王编写的代码部分
Dim wz (1 To n) As Integer

For i = 1 To n-1

wz(i) = i
For j = n To i+1 Step-1
If    (1)   Then
t = cj(j):cj(j) = cj(j-1):cj(j-1) = t
t = xh(j):xh(j) = xh(j-1):xh(j-1) = t
End If

Next j

Next i
     (2)   
Fo ri = 1 To n-1

For j = n To i+1 Step-1

If_    (3)   Then
t = cj(j):cj(j) = cj(j-1):cj(j-1) = t
t = xh(j):xh(j) = xh(j-1):xh(j-1) = t
t = wz(j):wz(j) = wz(j-1):wz(j-1) = t
End If
Next j

Next i

List2.Clear

List2.AddItem "学号姓名成绩座位号"

For i = 1 To n

List2.AddItemxh(i)+ " "+xm(i)+ " "+Str(cj(i))+ " "+Str(wz(i))

Next i

End Sub
Private Sub Com2_Click()'小李编写的代码部分
Dim wz(1 To n) As Integer,t(1 To n) As Integer

For i = 1 To n

t(i)=i

Next i

For i = 1 To n

For j = n To i+1 Step-1
If    (4)    Then
temp=t(j)：t(j)=t(j-1):t(j-1)=temp
End If

Next j

    (5)    

Next i

List2.Clear
List2.AddItem "学号姓名成绩座位号"

For i = 1 To n

List2.AddItemxh(i)+ " "+xm(i)+ " "+Str(cj(i))+ " "+Str(wz(i))
Next i
End Sub