最大整数问题：设有 n 个随机生成的正整数，将它们连接成一排，组成一个最大的多位整数。其求解 思想是：先把整数转换成字符串，然后再比较 a+b 和 b+a,如果 a+b＞b+a,就把 a 排在 b 的前 面，反之则把 b 排在 a 的前面。
例如：n=3 时，3 个整数 13，312，343，连成的最大整数为 34331213。
静静编写了一个 VB 程序，功能如下：在列表框 List1 中随机生成 n 个 1～1000 之间的整数，单击“求解”按钮 Command1 后，最大整数输出在文本框 Text1 中。当 n 等于 4 时，程序运行界面如图所示。

实现上述功能的 VB 程序如下，请回答下列问题：
（1）当 n=3 时，3 个数：517，571，57，由这三个数组成的最大整数为

57157517

57157517

。
（2）请在横线处填入合适的代码。
Const n=4
Dim a（1 To n） As Integer
Dim i As Integer,j As Integer Dim t As Integer,k As Integer Private Sub Form_Load

（　　）

（　　）

Randomize
For i=1 To n
a（i）=①

int（rnd*1000）+1

int（rnd*1000）+1

'生成 1～1000 之间的随机整数
List1.AddItem“a（“+CStr（i）+“）=“+CStr（a（i））
Next i End Sub
Function cmp（a As Integer,b As Integer） As Boolean
If CStr（a）+CStr（b）＜CStr（b）+CStr（a） Then
cmp=True
Else
cmp=False
End If
End Function
Private Sub Command1_Click

（　　）

（　　）

For i=1 To n-1
k=i
For j=i+1 To n
If  ②

cmp（a（k），a（j））

cmp（a（k），a（j））

 Then k=j
Next j
If  ③

k＜＞i

k＜＞i

 Then t=a（k）：a（k）=a（i）：a（i）=t
Next i
For i=1 To n
Text1.Text=Text1.Text+CStr（a（i））
Next i End Sub