求助:vb二维数组冒泡排序该怎么弄,都两天了还做不出来 。。。
题目要求:VB(6.0)从10到99中生成5行10列的50个的随机数,并分别用选择法降序排序输出和冒泡法升序输出。界面要求:有picturebox和三个command
随机数的代码已经写出来了,后面的排序该怎么弄呢?跪求!!!都弄了两天了还是没进展。。。
Private Sub command1_Click()
Picture1.Cls
Picture1.Print ; "排列前数据"
Randomize
Dim a(5, 10) As Integer
For i = 0 To 5
For j = 0 To 10
a(i, j) = Int((90) * Rnd + 10)
Picture1.Print a(i, j) & " ";
Next j
Picture1.Print
Next i
End Sub