超级列表框去删除指定标题表项

吾爱编程 · 发表于 2011-5-25 20:50:02

{:soso_e101:} 超级列表框去删除指定标题表项

q1051278389 · 发表于 2011-5-25 20:50:03

http://www.3600gz.cn/thread-51775-1-1.html

最佳答案的附件，不解释

fsjoe · 发表于 2011-5-25 21:20:56

是不是想在超级列表框中查找某文本,找到了就删除该行?
随便写了个子程序,你可在你的程序中调用
.版本 2
.支持库 iext
.子程序查找删除表项
.参数 C要查找文本, 文本型
.参数 N要查找的列, , , 0表示全查.>0为查指定列
.局部变量 N行数, 整数型
.局部变量 N1, 整数型
.局部变量 N列数, 整数型
.局部变量 N2, 整数型
.局部变量 C, 文本型
.局部变量 N已删表项数, 整数型
N行数＝超级列表框1.取表项数 ()
.计次循环首 (N行数, N1)
.如果 (N要查找的列＝ 0)
      N列数＝超级列表框1.取列数 ()
.否则
      N列数＝ 1
.如果结束
.计次循环首 (N列数, N2)
      C ＝超级列表框1.取标题 (N1 － 1 － N已删表项数, 选择 (N要查找的列＝ 0, N2 － 1, N要查找的列－ 1))
      .如果真 (C ＝ C要查找文本)
         N已删表项数＝ N已删表项数＋ 1
         超级列表框1.删除表项 (N1 － 1)
         跳出循环 ()
      .如果真结束
.计次循环尾 ()
.计次循环尾 ()

四海铭洋 · 发表于 2011-5-27 12:58:54

新手路过，学习一下

		自动登录	找回密码
密码			注册

[已解决] 超级列表框去删除指定标题表项

最佳答案

评分

评分