题目要求:VB(6.0)
从10到99中生成5行10列的50个的随机数,并分别用选择法降序排序输出和冒泡法升序输出。界面要求:有picturebox和三个command
我想要代码。。。
如何用VB生成随机数组并排序
答案:2 悬赏:40 手机版
解决时间 2021-12-19 13:53
- 提问者网友:兔牙战士
- 2021-12-19 00:59
最佳答案
- 五星知识达人网友:轮獄道
- 2021-12-19 01:55
晕!你这是要整个程序还是思路啊?
我只能给你个思路!
第一步:界面!
picturebox和三个command
第二步:程序!
1,用随机函数生成数组(就是两个随机函数生成数组,赋予某一个变量)哦,这是二维数组的,一维数组只需要一个随机函数就可以了
2,将随机生成数组的这一段程序添加到50次的循环过程中
3,分别用不同的排序方法排序并输出(排序其实很简单,就是循环过程中嵌套比较就可以了,输出的时候用格式format输出)
第三步:调试!
over!
我只能给你个思路!
第一步:界面!
picturebox和三个command
第二步:程序!
1,用随机函数生成数组(就是两个随机函数生成数组,赋予某一个变量)哦,这是二维数组的,一维数组只需要一个随机函数就可以了
2,将随机生成数组的这一段程序添加到50次的循环过程中
3,分别用不同的排序方法排序并输出(排序其实很简单,就是循环过程中嵌套比较就可以了,输出的时候用格式format输出)
第三步:调试!
over!
全部回答
- 1楼网友:归鹤鸣
- 2021-12-19 03:20
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
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯