易语言数字组合
在编辑框1中有很多两位数如02,80,77,23,42,34,43,56,89,19,72,81。。。等.需要在编辑框2中显示编辑框1中的所有号码从小到大排列,再把编辑框...
在编辑框1中有很多两位数如02,80,77,23,42,34,43,56,89,19,72,81。。。等.需要在编辑框2中显示编辑框1中的所有号码从小到大排列,再把编辑框2的所有号码组合,组号格式如02,19,23,34,四个号码为一组,在编辑框3中组合出所有排列,不可以重复。编辑框4相同与编辑框1(其中数据有些不同),编辑框5相同与编辑框2,编辑框3相同与编辑框6,再编辑框7中列出(编辑框3与编辑框6)之间的所有不同组合,在编辑框8中列出(编辑框3与编辑框6)之间的所有相同组合, 请高手指点,要详细点,我是初学者
展开
展开全部
闲来没事敲着玩,最笨的方法写了前面两个,瞅瞅玩吧,数组排序估计要转成整数数组才有效,文本数组这样排序没效果.
.版本 2
.局部变量 i, 整数型
.局部变量 i1, 整数型
.局部变量 i2, 整数型
.局部变量 t, 文本型
.局部变量 i3, 整数型
.局部变量 i4, 整数型
.如果真 (编辑框1.内容 ≠ “” 或 寻找文本 (编辑框1.内容, “,”, , 假) > -1)
sn = 分割文本 (编辑框1.内容, “,”, )
数组排序 (sn, 真)
.计次循环首 (取数组成员数 (sn), i)
.如果 (编辑框2.内容 = “”)
编辑框2.内容 = sn [i]
.否则
编辑框2.内容 = 编辑框2.内容 + “,” + sn [i]
.如果结束
.计次循环尾 ()
编辑框3.内容 = “”
.计次循环首 (取数组成员数 (sn), i1)
.计次循环首 (取数组成员数 (sn) - 1, i2)
.计次循环首 (取数组成员数 (sn) - 2, i3)
.计次循环首 (取数组成员数 (sn) - 3, i4)
.如果真 (sn [i1] ≠ sn [i2] 且 sn [i1] ≠ sn [i3] 且 sn [i1] ≠ sn [i4] 且 sn [i2] ≠ sn [i3] 且 sn [i2] ≠ sn [i4] 且 sn [i3] ≠ sn [i4])
' 输出调试文本 (sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4])
.如果 (编辑框3.内容 = “”)
编辑框3.内容 = sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4]
.否则
编辑框3.内容 = 编辑框3.内容 + #换行符 + sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4]
.如果结束
处理事件 ()
.如果真结束
.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()
.版本 2
.局部变量 i, 整数型
.局部变量 i1, 整数型
.局部变量 i2, 整数型
.局部变量 t, 文本型
.局部变量 i3, 整数型
.局部变量 i4, 整数型
.如果真 (编辑框1.内容 ≠ “” 或 寻找文本 (编辑框1.内容, “,”, , 假) > -1)
sn = 分割文本 (编辑框1.内容, “,”, )
数组排序 (sn, 真)
.计次循环首 (取数组成员数 (sn), i)
.如果 (编辑框2.内容 = “”)
编辑框2.内容 = sn [i]
.否则
编辑框2.内容 = 编辑框2.内容 + “,” + sn [i]
.如果结束
.计次循环尾 ()
编辑框3.内容 = “”
.计次循环首 (取数组成员数 (sn), i1)
.计次循环首 (取数组成员数 (sn) - 1, i2)
.计次循环首 (取数组成员数 (sn) - 2, i3)
.计次循环首 (取数组成员数 (sn) - 3, i4)
.如果真 (sn [i1] ≠ sn [i2] 且 sn [i1] ≠ sn [i3] 且 sn [i1] ≠ sn [i4] 且 sn [i2] ≠ sn [i3] 且 sn [i2] ≠ sn [i4] 且 sn [i3] ≠ sn [i4])
' 输出调试文本 (sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4])
.如果 (编辑框3.内容 = “”)
编辑框3.内容 = sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4]
.否则
编辑框3.内容 = 编辑框3.内容 + #换行符 + sn [i1] + “,” + sn [i2] + “,” + sn [i3] + “,” + sn [i4]
.如果结束
处理事件 ()
.如果真结束
.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询