1. 编写一个VB程序，实现功能为在n个数中寻找第m大的数。程序运行时，自动生成n个三位数随机整数，并显示在列表框List1中，单击“排序”按钮Command1，将数据进行排序，并将排好序的数据显示在列表框List2中，在文本框Text1中输入m，单击“计算”按钮Command2，在文本框Text2中显示第m大的数。程序运行效果如下图所示：

为实现上述功能的VB程序如下，在程序划线处填入合适的代码。

Dim d(1 To 20) As Integer

Const n = 20

Private Sub Form_Load()

    Dim i As Integer, j As Integer, t As Single

    List1.Clear

    Randomize

    For i = 1 To n

        

        List1.AddItem Str(d(i))

    Next i

End Sub

Private Sub Command1_Click()

    Dim i As Integer, j As Integer, t1 As Integer

    For i = 1 To n - 1

        For j =

            If d(j) < d(j - 1) Then

                t1 = d(j): d(j) = d(j - 1): d(j - 1) = t1

            End If

        Next j

    Next i

    For i = 1 To n

        List2.AddItem Str(d(i))

    Next i

End Sub

Private Sub Command2_Click()

    Dim m As Integer

    m = Val(Text1.Text)

    Text2.Text = “第” + Str(m) + “ 大的数为：” +

End Sub