学进去

AB两个篮球队进行了多场比赛，现在要统计比分并确定获胜球队。计分规则为胜场多的队伍获胜，若胜场相同，则计算累计小分（小分=本队得分-失分），小分多获胜，若还是相同则算平局。
小蓝同学根据上述算法编写了一个VB程序实现比赛结果统计。每场比分记录在文本框Text1中，单击“统计”按钮Command1，把两队各场的比分按A队小分降序显示在列表框List1输出，同时在文本框Text2输出最终结果。部分程序界面如图所示，VB代码如下，回答下列问题：

Private Sub Command1_Click()
Dim a(1 To 20)As Integer, b(1 To 20)As Integer
Dim i As Integer, j As Integer, t As Integer, p As Integer, k As Integer, xiaofen As Integer
　'从文本框读取比分,场次k,AB两队各场的得分分别记录在数组a、b,代码略
For i = 1 To k – 1　'对比分数据按A队小分降序排序
　For j = 1 To①__   _ 
　　If ②__   _ Then  
　　　t = a(j): a(j)= a(j + 1): a(j + 1)= t
　　　t = b(j): b(j)= b(j + 1): b(j + 1)= t
　　End If
　Next j
Next i
p = 0: xiaofen = 0
For i = 1 To k '统计小分并输出比分
　If a(i)> b(i)Then ③______ 
　xiaofen = xiaofen + a(i)- b(i)
　List1.AddItem Str(a(i))+ ":" + Str(b(i))
Next i
If p * 2 > k Or k = p * 2 And xiaofen > 0 Then
　Text2.Text = "A队获胜"
ElseIf  Then 　
　Text2.Text = "B队获胜"
Else
　Text2.Text = "两队战平了"
End If
End Sub
（1）若希望程序在运行时列表框List1清空，则应该在代码中添加语句____（单选，填字母： A.List1.additem/B.List1.clear/C.List1.清空/D.List1.caption）。 
（2）在程序画线处填入合适代码，使程序完整。
①________________________
②________________________
③________________________
（3）加框处代码有错，请改正。
改正：________________________