素数迁移：小王编写了一个VB程序，在左边List1中显示随机生成的10个介于[2,99]的随机整数，单击命令按钮Command1后，其中的素数全部迁移到右边的List2中并进行显示，同时只有那些非素数（合数）的才继续在List1中显示，运行界面如图所示。

实现上述功能的VB程序如下，请回答下列问题。
（1）根据代码可知，若要产生20个随机数，只需将____的值修改为20即可。
（2）请在划线处填入合适代码。
Const n = 10
Dim a(1 To n) As Integer
Private Sub Command1_Click() ’素数迁移模块
Dim i As Integer
List1.Clear ’清除列表框
List2.Clear
For i = 1 To n
For j = 2 To a(i) - 1
If ①__________  Then
Exit For    ’ Exit For的功能是退出For循环
End If
Next j
If  ②________ Then
List2.AddItem Str(a(i))
Else
List1.AddItem Str(a(i))
End If
Next i
End Sub
Private Sub Form_Load() ’随机数初始化模块
Randomize  ’随机数种子初始化
For i = 1 To n
a(i) =  ③___________
List1.AddItem Str(a(i))
Next i
End Sub