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