易语言问题: 如图怎样做,点击添加将编辑框中的内容添加到超级列表框中,并且不能重复添加
2个回答
展开全部
.版本 2
.支持库 iext
.子程序 添加项目
.局部变量 计次, 整数型
.计次循环首 (超级列表框1.取列数 (), 计次)
.如果真 (超级列表框1.取标题 (计次 - 1, 0) = 编辑框1.内容)
信息框 (“此项目已经添加。请勿重复添加!”, 0, )
返回 ()
.如果真结束
.计次循环尾 ()
计次 = 超级列表框1.插入表项 (, 编辑框1.内容, , , , )
超级列表框1.置标题 (计次, 1, 编辑框2.内容)
超级列表框1.置标题 (计次, 2, 编辑框3.内容)
编辑框1.内容 = “”
编辑框2.内容 = “”
编辑框3.内容 = “”
.支持库 iext
.子程序 添加项目
.局部变量 计次, 整数型
.计次循环首 (超级列表框1.取列数 (), 计次)
.如果真 (超级列表框1.取标题 (计次 - 1, 0) = 编辑框1.内容)
信息框 (“此项目已经添加。请勿重复添加!”, 0, )
返回 ()
.如果真结束
.计次循环尾 ()
计次 = 超级列表框1.插入表项 (, 编辑框1.内容, , , , )
超级列表框1.置标题 (计次, 1, 编辑框2.内容)
超级列表框1.置标题 (计次, 2, 编辑框3.内容)
编辑框1.内容 = “”
编辑框2.内容 = “”
编辑框3.内容 = “”
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询