最大整數(shù)問題：設(shè)有 n 個(gè)隨機(jī)生成的正整數(shù)，將它們連接成一排，組成一個(gè)最大的多位整數(shù)。其求解 思想是：先把整數(shù)轉(zhuǎn)換成字符串，然后再比較 a+b 和 b+a,如果 a+b＞b+a,就把 a 排在 b 的前 面，反之則把 b 排在 a 的前面。
例如：n=3 時(shí)，3 個(gè)整數(shù) 13，312，343，連成的最大整數(shù)為 34331213。
靜靜編寫了一個(gè) VB 程序，功能如下：在列表框 List1 中隨機(jī)生成 n 個(gè) 1～1000 之間的整數(shù)，單擊“求解”按鈕 Command1 后，最大整數(shù)輸出在文本框 Text1 中。當(dāng) n 等于 4 時(shí)，程序運(yùn)行界面如圖所示。

實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)回答下列問題：
（1）當(dāng) n=3 時(shí)，3 個(gè)數(shù)：517，571，57，由這三個(gè)數(shù)組成的最大整數(shù)為

57157517

57157517

。
（2）請(qǐng)?jiān)跈M線處填入合適的代碼。
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

（　?。?/div>

（　?。?/div>
Randomize
For i=1 To n
a（i）=①

int（rnd*1000）+1

int（rnd*1000）+1

'生成 1～1000 之間的隨機(jī)整數(shù)
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

（　　）

（　?。?/div>
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