为方便习题讲解，需对某次考试中选择题得分率数据进行统计分析，找出选择题得分率最低的前m 项对应的题号及考点（若有与第 m 项得分率相同的，一并选取）。
编写 VB 程序，实现上述功能。运行程序时，先读取每个选择题的题号、得分率和考点，显示在列表框 List1 中。在文本框 Text1 中输入得分率最低的前 m 项值，单击“统计”按钮，按照得分率从小到大升序排序，并在列表框 List2 中输出得分率最低前 m 项的题号、得分率及考点。程序运行界面如图所示。

请回答下列问题：
（1）“统计”按钮的事件过程名是

Select_Click

Select_Click

。
（2）实现上述功能的 VB 程序如下，请在横线处填入合适的代码。
（3）程序中加框处代码有错，请改正。
Dim n As Integer
Dim th（0 To 100）As Integer,df（0 To 100）As Single,kd（1 To 100）As String Private Sub Form_Load（　　）
'读取题号、得分率和考点分别存入数组 th、df 和 kd 数组，在列表框 List1 中显示，代码略
'选择题的个数存入变量 n,代码略End Sub
Function dq（x As String,k As Integer） As String
'固定数据的位数
dq=x
Do While①

Len（dq）＜k或Len（dq）＜＞k

Len（dq）＜k或Len（dq）＜＞k

dq=dq+““
Loop
End Function
Private Sub Select_Click（　　）
Dim m As Integer,i As Integer,j As Integer,p As Integer,t As Integer,mm As Integer
List2.Clear
m=Val（Text1.Text）
i=1
Do While i＜=n-1
p=i
For j=i+1 To n
If ②

df（th（j））＜df（th（p））

df（th（j））＜df（th（p））

Then p=j
Next j
If p＜＞i Then
t=th（i）：th（i）=th（p）：th（p）=t
End If
If  Then Exit Do'改 错
i=i+1
Loop
③

i＞m and df（th（i））＜＞df（th（i-1））

i＞m and df（th（i））＜＞df（th（i-1））

For i=1 To mm
List2.AddItem dq（Str（th（i）），6）+dq（Str（df（th（i））），8）+dq（kd（th（i）），12）
Next i End Sub