易语言怎么数字排列? 100
如图所示文本格式,都放在编辑框里面,怎么做到相同数字重复次数相加,然后数字再按照重复次数从大到小排列?求源码...
如图所示文本格式,都放在编辑框里面,怎么做到相同数字重复次数相加,然后数字再按照重复次数从大到小排列?求源码
展开
1个回答
展开全部
附代码! 如下。
.版本 2
.程序集 窗口程序集1
.程序集变量 变量, 整数型, , "0"
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
置随机数种子 ()
.子程序 _排序按钮_被单击
排序1 ()
.子程序 排序1
编辑框1.内容 = “”
数组排序 (变量, 真)
.计次循环首 (取数组成员数 (变量), 计次)
编辑框1.加入文本 (到文本 (变量 [计次]) + “,”)
.计次循环尾 ()
清除数组 (变量)
.子程序 _随机按钮_被单击
取随机数1 ()
.子程序 取随机数1
.局部变量 随机数, 整数型
编辑框1.内容 = “”
清除数组 (变量)
.计次循环首 (取随机数 (1, 20), 计次)
随机数 = 取随机数 (1, 500)
加入成员 (变量, 随机数)
编辑框1.加入文本 (到文本 (变量 [计次]) + “,”)
.计次循环尾 ()
.版本 2
.程序集 窗口程序集1
.程序集变量 变量, 整数型, , "0"
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
置随机数种子 ()
.子程序 _排序按钮_被单击
排序1 ()
.子程序 排序1
编辑框1.内容 = “”
数组排序 (变量, 真)
.计次循环首 (取数组成员数 (变量), 计次)
编辑框1.加入文本 (到文本 (变量 [计次]) + “,”)
.计次循环尾 ()
清除数组 (变量)
.子程序 _随机按钮_被单击
取随机数1 ()
.子程序 取随机数1
.局部变量 随机数, 整数型
编辑框1.内容 = “”
清除数组 (变量)
.计次循环首 (取随机数 (1, 20), 计次)
随机数 = 取随机数 (1, 500)
加入成员 (变量, 随机数)
编辑框1.加入文本 (到文本 (变量 [计次]) + “,”)
.计次循环尾 ()
追问
不行吧,你看我的全部内容
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询