标题:求助:vb二维数组冒泡排序该怎么弄,都两天了还做不出来 。。。
取消只看楼主
绿野清风
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2012-6-9
 问题点数:0 回复次数:1 
求助: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
搜索更多相关主题的帖子: command 要求 
2012-06-09 20:14
绿野清风
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2012-6-9
得分:0 
好心人帮帮忙
2012-06-09 20:27



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-371184-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.588363 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved