永发信息网

如何用VB生成随机数组并排序

答案:2  悬赏:40  手机版
解决时间 2021-12-19 13:53
题目要求:VB(6.0)
从10到99中生成5行10列的50个的随机数,并分别用选择法降序排序输出和冒泡法升序输出。界面要求:有picturebox和三个command

我想要代码。。。
最佳答案
晕!你这是要整个程序还是思路啊?
我只能给你个思路!
第一步:界面!
picturebox和三个command
第二步:程序!
1,用随机函数生成数组(就是两个随机函数生成数组,赋予某一个变量)哦,这是二维数组的,一维数组只需要一个随机函数就可以了
2,将随机生成数组的这一段程序添加到50次的循环过程中
3,分别用不同的排序方法排序并输出(排序其实很简单,就是循环过程中嵌套比较就可以了,输出的时候用格式format输出)
第三步:调试!
over!
全部回答
private sub form_load() dim arr(9999) as string dim a(35) as string for i = 0 to 9 a(i) = chr(48 + i) next i for i = 10 to 35 a(i) = chr(87 + i) next i randomize for i = 0 to 9999 strleft = format(int(rnd * 301), "000") strright = "" for j = 0 to 4 strright = strright & a(int(rnd * 36)) next j arr(i) = strleft & " " & strright next i end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
——HowmuchshallIpayforthephonecall?——Yo
金平区民政局地址在哪?我要去那里办事
梦幻西游里如何让体力变满
When the teacher came in, he saw some boys
农用四轮拖拉机冬季不换机油能使用吗,加的柴
龙湖区民政局在什么地方啊,我要处理点事
单选题2008年6月20日银行间外汇市场美元对人
单选题郑和下西洋,其航行的时间应该为A.10月
It was not until I was injured in a car ac
四会市民政局办公地址在什么地方?我要处理点
单选题下列不能引起种群基因频率改变的因素是
女生适合唱的抒情歌曲,能让人印象深刻的,谢
单选题Expo 2010 Shanghai China&
建瓯宠物店有收狗的吗比熊
封开县民政局地址有知道的么?有点事想过去!
推荐资讯
单选题国家制定了老年人权益保障法,保障老年
我用奥尔良腌制鸡胸肉怎么肉的颜色不红呢,也
单选题我国现阶段的银行分为中央银行、商业银
国外买的佳能500D相机,回到国内能保修吗?
单选题Myfatherbegantowork______abusdri
微信如何制作图文音乐
油漆固化剂是什么
淘宝“淘金币”是什么意思?
抵押贷款的意义
单选题朝鲜和韩国的国界线划分的依据是A.山脉
风什么夜什么 的成语
搬家红包怎么写
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?