易语言问题: 如图怎样做,点击添加将编辑框中的内容添加到超级列表框中,并且不能重复添加

如题所述

.版本 2
.支持库 iext
.子程序 添加项目
.局部变量 计次, 整数型
.计次循环首 (超级列表框1.取列数 (), 计次)
.如果真 (超级列表框1.取标题 (计次 - 1, 0) = 编辑框1.内容)
信息框 (“此项目已经添加。请勿重复添加!”, 0, )
返回 ()
.如果真结束
.计次循环尾 ()
计次 = 超级列表框1.插入表项 (, 编辑框1.内容, , , , )
超级列表框1.置标题 (计次, 1, 编辑框2.内容)
超级列表框1.置标题 (计次, 2, 编辑框3.内容)
编辑框1.内容 = “”
编辑框2.内容 = “”
编辑框3.内容 = “”
温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-08-27
先申请一个整数型变量:a

a=超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题(a,0,编辑框1.内容)
超级列表框1.置标题(a,1,编辑框2.内容)
超级列表框1.置标题(a,2,编辑框3.内容)