编写VB程序,实现在1到40中随机抽取n个不重复的数字。在文本框Text1中输入需要抽取的个数n,单击“抽取”按钮 Command1,在列表List1中输出结果,程序设计界面如图a所示。请回答下列问题:

图 a
(1)在设计程序界面时,应使用图 b 所示“控件工具箱”中的_____ (填写相应编号)添加列表框。

图 b
(2)实现上述功能的VB程序如下,请在划线处填写合适的代码。
Private Sub Command1_Click()
Dim a(1 To 40) As Integer Dim i As Integer List1.Clear
n = Val(Text1.Text) Randomize
For i = 1 To n
①_____ ’随机生成1,40之间的正整数
For j = 1 To i - 1
If a(j) = a(i) Then

Exit For
End If
Next j
Next i
For i = 1 To n
List1.AddItem Str(a(i)) Next i
End Sub
(3)加框处代码有误,请改正_____。
(4)运行程序,在文本框 Text1 中输入 41,单击“抽取”按钮,程序错误提示为_____。(填写字母: