大佬帮看看 超级表框 分类 删除排列~

zzz77f

  

子程序名	返回值类型	公开	备 注
_按钮_自用测试_被单击

变量名	类 型	静态	数组	备 注
i	整数型
index	整数型

' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )
计次循环首 (超级列表框_中控显示.取表项数 (), i)
如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1, 5) ＝ “已完成”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1, 1))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1, 2))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1, 3))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1, 4))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1, 5))
_软件窗口.超级列表框_中控显示.删除表项 (i － 1)

如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1, 5) ＝ “未运行”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1, 1))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1, 2))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1, 3))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1, 4))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1, 5))
_软件窗口.超级列表框_中控显示.删除表项 (i － 1)

计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮_自用测试_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 index, 整数型<br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> ' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )<br /> .计次循环首 (超级列表框_中控显示.取表项数 (), i)<br /> <br />     .如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1, 5) ＝ “已完成”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1, 1))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1, 2))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1, 3))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1, 4))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (i － 1)<br /> <br />     .如果真结束<br /> <br /> <br /> <br />     .如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1, 5) ＝ “未运行”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1, 1))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1, 2))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1, 3))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1, 4))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (i － 1)<br /> <br />     .如果真结束<br /> <br /> <br /> <br /> <br /> <br /> <br /> .计次循环尾 ()

熬夜

_软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1, 1))  
改成

_软件窗口.超级列表框_已完成.置标题 (index, 1, 超级列表框_中控显示.取标题 (i － 1, 1))

全部改 懂？

zzz77f

每次导入 三行过去  多余的就不见了，   这个删除判断的问题应该是  而且还会重复   还不自动排列~~~~

LEOONL

  

子程序名	返回值类型	公开	备 注
_按钮_自用测试_被单击

变量名	类 型	静态	数组	备 注
i	整数型
index	整数型

' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )
计次循环首 (超级列表框_中控显示.取表项数 (), i)
如果真 (超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5) ＝ “已完成”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 1))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 2))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 3))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 4))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5))
_软件窗口.超级列表框_中控显示.删除表项 (超级列表框_中控显示.取表项数（）-i)

如果真 (超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5) ＝ “未运行”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 1))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 2))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 3))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 4))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5))
_软件窗口.超级列表框_中控显示.删除表项 (超级列表框_中控显示.取表项数（）-i）

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮_自用测试_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 index, 整数型<br /> <br /> ' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )<br /> .计次循环首 (超级列表框_中控显示.取表项数 (), i)<br />     .如果真 (超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5) ＝ “已完成”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 1))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 2))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 3))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 4))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (超级列表框_中控显示.取表项数（）-i)<br /> <br />     .如果真结束<br /> <br />     .如果真 (超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5) ＝ “未运行”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 1))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 2))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 3))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 4))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (超级列表框_中控显示.取表项数（）-i, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (超级列表框_中控显示.取表项数（）-i）<br />     .如果真结束<br /> <br /> .计次循环尾 ()

zzz77f

LEOONL 发表于 2024-8-11 00:21
[e=0].版本 2

.子程序 _按钮_自用测试_被单击

好的我试试

zzz77f

LEOONL 发表于 2024-8-11 00:21
[e=0].版本 2

.子程序 _按钮_自用测试_被单击

QQ1542487363  你加我看看 可以，这个 好像不行 ~

LEOONL

zzz77f 发表于 2024-8-11 00:25
QQ1542487363  你加我看看 可以，这个 好像不行 ~

不行是什么问题

真冬

  

子程序名	返回值类型	公开	备 注
_按钮_自用测试_被单击

变量名	类 型	静态	数组	备 注
i	整数型
index	整数型
淋湿超表	超级列表框		0
中控标题5	文本型
i1	整数型
i2	整数型

加入成员 (淋湿超表, _软件窗口.超级列表框_已完成)
加入成员 (淋湿超表, _软件窗口.超级列表框_未运行)
变量循环首 (_软件窗口.超级列表框_中控显示.取表项数 () － 1, 0, -1, i)
中控标题5 ＝ _软件窗口.超级列表框_中控显示.取标题 (i, 5)
计次循环首 (取数组成员数 (淋湿超表), i1)
如果真 (寻找文本 (取组件名称 (淋湿超表 [i1]), 中控标题5, , 假) ≠ -1)  ' “已完成”“未运行”
调试输出 (取组件名称 (淋湿超表 [i1]), “找到”, 中控标题5)
index ＝ 淋湿超表 [i1].插入表项 (, 到文本 (i), , , , )
变量循环首 (1, 5, 1, i2)  ' i2既1到5
淋湿超表 [i1].置标题 (i, i2, 超级列表框_中控显示.取标题 (i, i2))
变量循环尾 ()
_软件窗口.超级列表框_中控显示.删除表项 (i)

计次循环尾 ()
变量循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 _按钮_自用测试_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 index, 整数型<br /> .局部变量 淋湿超表, 超级列表框, , "0"<br /> .局部变量 中控标题5, 文本型<br /> .局部变量 i1, 整数型<br /> .局部变量 i2, 整数型<br /> <br /> 加入成员 (淋湿超表, _软件窗口.超级列表框_已完成)<br /> 加入成员 (淋湿超表, _软件窗口.超级列表框_未运行)<br /> .变量循环首 (_软件窗口.超级列表框_中控显示.取表项数 () － 1, 0, -1, i)<br />     中控标题5 ＝ _软件窗口.超级列表框_中控显示.取标题 (i, 5)<br />     .计次循环首 (取数组成员数 (淋湿超表), i1)<br />         .如果真 (寻找文本 (取组件名称 (淋湿超表 [i1]), 中控标题5, , 假) ≠ -1)  ' “已完成”“未运行”<br />             调试输出 (取组件名称 (淋湿超表 [i1]), “找到”, 中控标题5)<br />             index ＝ 淋湿超表 [i1].插入表项 (, 到文本 (i), , , , )<br />             .变量循环首 (1, 5, 1, i2)  ' i2既1到5<br />                 淋湿超表 [i1].置标题 (i, i2, 超级列表框_中控显示.取标题 (i, i2))<br />             .变量循环尾 ()<br />             _软件窗口.超级列表框_中控显示.删除表项 (i)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .变量循环尾 ()

补充内容 (2024-8-11 00:40):
主要是你没有倒着删，改成倒着删除就好了

补充内容 (2024-8-11 00:43):
淋湿超表 [i1].置标题 (index, i2, 超级列表框_中控显示.取标题 (i, i2))   'i2里的循环忘记i改成index了

LEOONL

  

子程序名	返回值类型	公开	备 注
_按钮_自用测试_被单击

变量名	类 型	静态	数组	备 注
i	整数型
index	整数型
计数	整数型

' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )
计次循环首 (超级列表框_中控显示.取表项数 (), i)
如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1-计数, 5) ＝ “已完成”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1-计数, 1))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1-计数, 2))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1-计数, 3))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1-计数, 4))
_软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1-计数, 5))
_软件窗口.超级列表框_中控显示.删除表项 (i － 1-计数)
计数 ＝ 计数 ＋ 1

如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1-计数, 5) ＝ “未运行”)
index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )
_软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1-计数, 1))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1-计数, 2))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1-计数, 3))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1-计数, 4))
_软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1-计数, 5))
_软件窗口.超级列表框_中控显示.删除表项 (i － 1-计数)
计数 ＝ 计数 ＋ 1

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮_自用测试_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 index, 整数型<br /> .局部变量 计数, 整数型<br /> <br /> ' _软件窗口.超级列表框_中控显示.插入表项 (, , , , , )<br /> .计次循环首 (超级列表框_中控显示.取表项数 (), i)<br />     .如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1-计数, 5) ＝ “已完成”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1-计数, 1))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1-计数, 2))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1-计数, 3))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1-计数, 4))<br />         _软件窗口.超级列表框_已完成.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1-计数, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (i － 1-计数)<br />         计数 ＝ 计数 ＋ 1<br />     .如果真结束<br /> <br />     .如果真 (_软件窗口.超级列表框_中控显示.取标题 (i － 1-计数, 5) ＝ “未运行”)<br />         index ＝ _软件窗口.超级列表框_已完成.插入表项 (, , , , , )<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 0, 到文本 (i))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 1, 超级列表框_中控显示.取标题 (i － 1-计数, 1))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 2, 超级列表框_中控显示.取标题 (i － 1-计数, 2))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 3, 超级列表框_中控显示.取标题 (i － 1-计数, 3))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 4, 超级列表框_中控显示.取标题 (i － 1-计数, 4))<br />         _软件窗口.超级列表框_未运行.置标题 (i － 1, 5, 超级列表框_中控显示.取标题 (i － 1-计数, 5))<br />         _软件窗口.超级列表框_中控显示.删除表项 (i － 1-计数)<br />         计数 ＝ 计数 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()