求助：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
