题目内容:
以下程序的功能是:用冒泡法对数组的10个元素进行排序,最后在窗体上打印排序后的数据。冒泡法的思路:将相邻两个数比较,将小的调到前面。请在空白处填上适当的内容,将程序补充完整。
Option Base l
Private Sub Command l_Click()
Dim i As Integer,j As Integer
Dim a
a=Array(32,45,-34,2345,988,-8387,787,-75,23,32)
For i=1 T0 10
For 【1】
If 【2】Then
temp=a(i)
a(i)=a(j)
a(j)=temp
End If
Next j
Next i
Forj=1 T0 10
Printa(i)
Next i
End Sub
参考答案:
答案解析: