易语言 编辑框内容不重复随机按组排列 150
现编辑框1内有若干数字，数字可能有一位数、两位数或者三位数，而且不是顺序排列，每行为一个数字，想以三个为一组，一组后换行再排一组直至排完，如最后剩余为四个数，则两个数一组...
现编辑框1内有若干数字，数字可能有一位数、两位数或者三位数，而且不是顺序排列，每行为一个数字，想以三个为一组，一组后换行再排一组直至排完，如最后剩余为四个数，则两个数一组排列，如最后剩余为五个数，则一组三个数一组，一组两个数一组排列，重新不重复随机排列至编辑框2内，请问能用易语言实现么，麻烦给下源码，谢谢，易语言菜鸟求助！采纳后再追加100分，谢谢。
展开
展开全部
.版本 2
.支持库 spec
.子程序 __启动窗口_创建完毕
.局部变量 n, 整数型
.局部变量 数组, 整数型, , "0"
.局部变量 随机数, 整数型
.局部变量 余数, 整数型
.局部变量 临时, 文本型
置随机数种子 ()
.计次循环首 (1000, n)
随机数 ＝ 取随机数 (1, 999)
编辑框1.加入文本 (到文本 (随机数) ＋ #换行符)
加入成员 (数组, 随机数)
.计次循环尾 ()
' -----------------------以上随机取一组数据并加入到数组---------------------------
数组排序 (数组, 真) ' 对数组进行从小到大的排序
.计次循环首 (取数组成员数 (数组), n)
编辑框3.加入文本 (到文本 (数组 [n]) ＋ #换行符)
.计次循环尾 ()
' ----------------以上将排序后的数组放进编辑框用来直观排序结果-----------------------
.计次循环首 (绝对取整 (取数组成员数 (数组) ÷ 3), n)
编辑框2.加入文本 (到文本 (数组 [(n － 1) × 3 ＋ 1]) ＋ “ ” ＋ 到文本 (数组 [(n － 1) × 3 ＋ 2]) ＋ “ ” ＋ 到文本 (数组 [(n － 1) × 3 ＋ 3]) ＋ #换行符)
.计次循环尾 ()
余数 ＝ 取数组成员数 (数组) ％ 3 ' 尾数只能是1或2
调试输出 (余数)
.如果真 (余数 ≠ 0)
临时 ＝ “”
.计次循环首 (余数, n)
临时 ＝ 临时 ＋ “ ” ＋ 到文本 (数组 [取数组成员数 (数组) － n])
.计次循环尾 ()
编辑框2.加入文本 (临时)
更多追问追答
追问
效果不是这样。
编辑框1内已经有若干个数了，是固定的，不是重新生成，将编辑框1的数以三个数为一组，排完一组后换行再排一组直至排完，如最后剩余为四个数，则两个数一组排列，如最后剩余为五个数，则三个数一组，另一组两个数一组排列，重新并且不重复随机排列至编辑框2内，谢谢。
追答
那你把编辑框里面的内容读出分割成数字加入到数组一样的啊，整个过程都已经给你写出来了，参考变通下就行了嘛，不要那么死板嘛
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
