易语言超级列表框同样的数据次数加1

guige666

大佬们主要问题有一个
超级列表框1的提交次数问题
如果提交进来的数据一样，那么在提交次数后面就是123456这样的形势改变，而不是插入新的数据进来。
下面是我的写法，有没有大佬帮我纠正或是是改变一下，提交次数的那个是超级列表框1。

爱慧慧

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
机器码	文本型
手机号	文本型
计次	整数型
判断	逻辑型
索引	整数型
提交次数	整数型

如果 (取文本长度 (机器码) ≠ 11)
计次循环首 (超级列表框1.取表项数 (), 计次)
如果 (机器码 ＝ 超级列表框1.取标题 (计次 － 1, 1))
提交次数 ＝ 到整数 (超级列表框1.取标题 (计次 － 1, 2))
提交次数 ＝ 提交次数 ＋ 1
超级列表框1.置标题 (计次 － 1, 1, 机器码)
超级列表框1.置标题 (计次 － 1, 2, 到文本 (提交次数))
判断 ＝ 真
跳出循环 ()


判断 ＝ 假

计次循环尾 ()
如果真 (判断 ＝ 假)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 1, 机器码)
超级列表框1.置标题 (索引, 2, 到文本 (1))

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 子程序1<br /> .局部变量 机器码, 文本型<br /> .局部变量 手机号, 文本型<br /> .局部变量 计次, 整数型<br /> .局部变量 判断, 逻辑型<br /> .局部变量 索引, 整数型<br /> .局部变量 提交次数, 整数型<br /> <br /> <br /> <br /> <br /> <br /> .如果 (取文本长度 (机器码) ≠ 11)<br />     .计次循环首 (超级列表框1.取表项数 (), 计次)<br />         .如果 (机器码 ＝ 超级列表框1.取标题 (计次 － 1, 1))<br />             提交次数 ＝ 到整数 (超级列表框1.取标题 (计次 － 1, 2))<br />             提交次数 ＝ 提交次数 ＋ 1<br />             超级列表框1.置标题 (计次 － 1, 1, 机器码)<br />             超级列表框1.置标题 (计次 － 1, 2, 到文本 (提交次数))<br />             判断 ＝ 真<br />             跳出循环 ()<br />         .否则<br /> <br />             判断 ＝ 假<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (判断 ＝ 假)<br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (索引, 1, 机器码)<br />         超级列表框1.置标题 (索引, 2, 到文本 (1))<br />     .如果真结束<br /> <br /> <br /> <br /> .否则

小明无敌

我也想用手机ZZ

走一回

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

超级列表框1.类型 ＝ 3
超级列表框1.插入列 (0, “号码”, 100, , , )
超级列表框1.插入列 (1, “计数”, 50, , , )
超级列表框1.插入列 (2, “计数”, 50, , , )

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
sy
计值	整数型
数组	文本型		0

计次循环首 (超级列表框1.取表项数 (), i)
加入成员 (数组, 超级列表框1.取标题 (i － 1, 0))
加入成员 (数组, 超级列表框1.取标题 (i － 1, 1))
计次循环尾 ()
如果 (取数组成员数 (数组) ＝ 0)
如果真 (超级列表框1.取表项数 () ＝ 0)
sy ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (sy, 0, 编辑框1.内容)
超级列表框1.置标题 (sy, 1, “1”)

重定义数组 (数组, 真, 取数组成员数 (数组) ÷ 2, 2)
变量循环首 (取数组下标 (数组, ), 1, -1, i)
如果 (数组 [i] [1] ＝ 编辑框1.内容)
调试输出 (“i”, i, , 数组 [i] [1], 数组 [i] [2])
调试输出 (数组 [i] [1] ＝ 编辑框1.内容)
计值 ＝ 到整数 (数组 [i] [2]) ＋ 1
跳出循环 ()
计值 ＝ 1

变量循环尾 ()
sy ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (sy, 0, 编辑框1.内容)
超级列表框1.置标题 (sy, 1, 到文本 (计值))

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 超级列表框1.类型 ＝ 3<br /> 超级列表框1.插入列 (0, “号码”, 100, , , )<br /> 超级列表框1.插入列 (1, “计数”, 50, , , )<br /> 超级列表框1.插入列 (2, “计数”, 50, , , )<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 sy<br /> .局部变量 计值, 整数型<br /> .局部变量 数组, 文本型, , "0"<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     加入成员 (数组, 超级列表框1.取标题 (i － 1, 0))<br />     加入成员 (数组, 超级列表框1.取标题 (i － 1, 1))<br /> .计次循环尾 ()<br /> .如果 (取数组成员数 (数组) ＝ 0)<br />     .如果真 (超级列表框1.取表项数 () ＝ 0)<br />         sy ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (sy, 0, 编辑框1.内容)<br />         超级列表框1.置标题 (sy, 1, “1”)<br />     .如果真结束<br /> <br /> .否则<br />     重定义数组 (数组, 真, 取数组成员数 (数组) ÷ 2, 2)<br />     .变量循环首 (取数组下标 (数组, ), 1, -1, i)<br />         .如果 (数组 <i> [1] ＝ 编辑框1.内容)<br />             调试输出 (“i”, i, , 数组 <i> [1], 数组 <i> [2])<br />             调试输出 (数组 <i> [1] ＝ 编辑框1.内容)<br />             计值 ＝ 到整数 (数组 <i> [2]) ＋ 1<br />             跳出循环 ()<br />         .否则<br />             计值 ＝ 1<br />         .如果结束<br /> <br />     .变量循环尾 ()<br />     sy ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (sy, 0, 编辑框1.内容)<br />     超级列表框1.置标题 (sy, 1, 到文本 (计值))<br /> .如果结束

补充内容 (2020-7-25 10:30):
明白了,你的答案要求的方法更容易实现

guige666

走一回 发表于 2020-7-25 01:52
[e=3].版本 2
.支持库 iext
.支持库 spec

谢谢大佬，不是你这种。