Question

在易语言超级列表框中输入条码时怎样让数量递增？求解

在扫描输入条码时，如果有相同的商品，想让数量在之前的基础上自动递增一个，做了几次都没成功，后来又用“查找表项”的方法在有相同的商品重新插入表项，这时就要删除以前的记录，但是我不能确定用“查找表项”的方法准确在哪一列的表项数，也无法准确的删除之前的记录，在此寻求老师的帮助，如果有更好的方法还请指教。截图和代码如下：.版本 2.支持库 iext.程序集 窗口程序集2.子程序 _按钮1_被单击.局部变量 计次, 整数型.局部变量 数量, 整数型.局部变量 表项数, 整数型数量 ＝ 到整数 (编辑框数量.内容).如果 (_启动窗口.超级列表框1.查找表项 (编辑框商品.内容, 0, 真, ) ≠ -1) ' 无法确定被查找的是第几行，下面就无法删除。 ' 表项数=？ ' _启动窗口.超级列表框1.删除表项 (表项数) 数量 ＝ 数量 ＋ 1.否则.如果结束.如果 (编辑框商品.内容 ＝ “”) 信息框 (“请输入商品名称”, 0, “提示”).否则 .如果 (编辑框数量.内容 ＝ “”) 信息框 (“请输入数量”, 0, “提示”) .否则 全局句柄 ＝ _启动窗口.超级列表框1.插入表项 (, , , , , ) _启动窗口.超级列表框1.置标题 (全局句柄, 0, 编辑框商品.内容) _启动窗口.超级列表框1.置标题 (全局句柄, 1, 到文本 (数量)) 连续赋值 (“”, 编辑框商品.内容, 编辑框数量.内容)

Answer 1

身边没有易，大概说下思路

.版本 2.支持库 iext
.子程序 _按钮2_被单击.局部变量 表项索引, 整数型
.如果 (编辑框1.内容 ＝ “”)
信息框 (“请输入商品名称”, 0, )
.否则
.如果 (编辑框2.内容 ＝ “”)
信息框 (“请输入商品数量”, 0, )
.否则
表项索引 ＝ 窗口1.超级列表框1.查找表项 (编辑框1.内容, , 真, 0)
.如果 (表项索引 ≠ -1)
窗口1.超级列表框1.置标题 (表项索引, 1, 到文本 (到整数 (编辑框2.内容) ＋ 到整数 (窗口1.超级列表框1.取标题 (表项索引, 1))))
.否则
表项索引 ＝ 窗口1.超级列表框1.插入表项 (, 编辑框1.内容, , , , )
窗口1.超级列表框1.置标题 (表项索引, 1, 编辑框2.内容)
.如果结束

.如果结束
.如果结束

有不懂得 发短息给我~

Answer 2

.版本 2

 .支持库 iext

 

 .子程序 _按钮1_被单击

 .局部变量 局_索引, 整数型

 

 局_索引 ＝ 超级列表框1.查找表项 (编辑框1.内容, , , 0)

 .判断开始 (局_索引 ＝ -1)

     局_索引 ＝ 超级列表框1.插入表项 (, , , , , )

     超级列表框1.置标题 (局_索引, 0, 编辑框1.内容)

     超级列表框1.置标题 (局_索引, 1, 编辑框2.内容)

 .默认

     超级列表框1.置标题 (局_索引, 1, 到文本 (到数值 (编辑框2.内容) ＋ 到数值 (超级列表框1.取标题 (局_索引, 1))))

 .判断结束