下面程序的功能为 利用 Rnd 函数产生 10 个随机数存放在数组中,然后按从小到大的顺序显示出来。要求使用子过程 sort() 实现排序。请将程序补充完整。 Private Sub sort( 【 1 】 , n%) Dim i%, j% For i = 1 To n - 1 For j = 【 2 】 To n If a(j) < a(i) Then t = a(j) 【 3 】 a(i) = t End If Next j, i End Sub Private Sub Form_Click() Dim a%(1 To 10), i% Print " 排序前 :" For i = 1 To 10 a(i) = Int(Rnd * 101 + 100) Print a(i); Next i Print 【 4 】 Print " 排序后 :" For i = 1 To 10 Print a(i); Next i Print End Sub