|
发表于 2024-5-10 11:42:39
|
显示全部楼层
新疆维吾尔自治区乌鲁木齐市
.版本 2
.支持库 iext
.子程序 cha询程序, , 公开, 在岗cha询
.局部变量 计次, 整数型
.局部变量 i, 整数型
.局部变量 s, 整数型, , "0"
.计次循环首 (超级列表框2.取表项数 (), i)
.如果真 (寻找文本 (超级列表框2.取标题 (i - 1, 1), 编辑框1.内容, , 假) = -1 且 寻找文本 (超级列表框2.取标题 (i - 1, 3), 编辑框1.内容, , 假) = -1 且 寻找文本 (超级列表框2.取标题 (i - 1, 12), 编辑框1.内容, , 假) = -1 且 寻找文本 (超级列表框2.取标题 (i - 1, 13), 编辑框1.内容, , 假) = -1 且 寻找文本 (超级列表框2.取标题 (i - 1, 9), 编辑框1.内容, , 假) = -1)
加入成员 (s, i - 1)
.如果真结束
.计次循环尾 ()
数组排序 (s, 假)
.计次循环首 (取数组成员数 (s), i)
超级列表框2.删除表项 (s [i])
.计次循环尾 ()
cha询,你参考一下这个。。
|
|