数组排序．点击“产生随机数”按钮，让计算机随机产生10个整数，并对这10个整数进行标号，再点击“排序”按钮，对这10个整数进行从大到小排序．如图所示．

程序代码如下：
Dim a（1To 10）As Integer
Dim i,j,k,kt As Integer
Private Sub Command1_Click （　　）
List1．Clear'清除列表框数据
For i=1To 10
Randomize'随机数初始化
a（i）=Int（Rnd*1000）
List1．AddItem Str（i）+”=”+Str（a（i））
Next i
Command2．Enabled=True'激活排序按钮
End Sub
Private Sub Command2_Click
For i=1To 9
k=i
For j=____①___To 10
If a（j）＞a（k） Then k=j
Next j
If i＜＞k Then
_②____
End If
Next i
List2．Clear
For i=1To 10
List2．AddItem Str（i）+”=”+Str（a（i））
Next i
End Sub
请在①、②横线处填入合适的语句或表达式，把程序补充完整：
程序中①横线处应填入

i+1

i+1

；
程序中②横线处应填入

t=a（k）：a（k）=a（i）：a（i）=t

t=a（k）：a（k）=a（i）：a（i）=t

．