超级列表框插入表项问题

zyg666

点击按钮，有重复的按顺序1-2-3这样，不是重复的，从1开始，这个该怎么写呢

LEOONL

zyg666 发表于 2024-10-15 13:41
绕晕了，比如第一次插入第一个项目，插入两次按照1,2这样，第二次插入第二个项目的时候，从1开 ...

  

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

变量名	类 型	静态	数组	备 注
插入内容	文本型

插入内容 ＝ 编辑框1.内容
如果 (超级列表框1.取标题 (超级列表框1.取表项数 () － 1, 1) ＝ 插入内容)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, 到文本 (到数值 (超级列表框1.取标题 (超级列表框1.取表项数 () － 2, 0)) ＋ 1))
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 插入内容)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, “1”)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 插入内容)

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 插入内容, 文本型<br /> <br /> 插入内容 ＝ 编辑框1.内容<br /> .如果 (超级列表框1.取标题 (超级列表框1.取表项数 () － 1, 1) ＝ 插入内容)<br />     超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, 到文本 (到数值 (超级列表框1.取标题 (超级列表框1.取表项数 () － 2, 0)) ＋ 1))<br />     超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 插入内容)<br /> .否则<br />     超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, “1”)<br />     超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 插入内容)<br /> .如果结束

LEOONL

排序完再导入列表

  

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

变量名	类 型	静态	数组	备 注
文本	文本型		0

文本 ＝ { “项目1----序号2”, “序号2----序号2”, “序号2----序号1”, “项目1----序号1” }
数组_排序1 (文本, )
调试输出 (文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型, , "0"<br /> <br /> 文本 ＝ { “项目1----序号2”, “序号2----序号2”, “序号2----序号1”, “项目1----序号1” }<br /> 数组_排序1 (文本, )<br /> 调试输出 (文本)

zyg666

LEOONL 发表于 2024-10-15 13:38
排序完再导入列表

[e=0].版本 2

这个是每次点击一下插入的

Suky

LEOONL 发表于 2024-10-15 13:38
排序完再导入列表

[e=0].版本 2

理解错啦，你给他的界面加两个编辑框，就理解什么意思了

zyg666

LEOONL 发表于 2024-10-15 13:38
排序完再导入列表

[e=0].版本 2

绕晕了，比如第一次插入第一个项目，插入两次按照1,2这样，第二次插入第二个项目的时候，从1开始，依次类推这样的

zyg666

Suky 发表于 2024-10-15 13:39
理解错啦，你给他的界面加两个编辑框，就理解什么意思了

对对对