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

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

79791719

79791719

。
（2）请在横线处填入合适的代码。Const n=4
Dim a（1To 10）As Integer
Private Sub Form_Load （　　）’函数 CStr （　　）和 Str （　　）功能类似，但输出字符时无前导空格
Randomize
For i=1To n
a（i）=①      ’生成 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 （　　）
Dim i As Integer,j As Integer,temp As Integer Text1．Text=““
For i=1To n-1
For j=n To i+1Step-1
If  ②      Then
temp=a（j-1）
a（j-1）=a（j）
 ③       
End If
Next j
Next i
For i=1To n
Text1．Text=Text1．Text+CStr（a（i））
Next i End Sub