选择列表框中的多个值，然后删除 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 选择列表框中的多个值，然后删除

标题：选择列表框中的多个值，然后删除

取消只看楼主

szweifj

等　级：论坛游民
帖　子：30
专家分：26
注　册：2010-2-10
结帖率：75%

楼主

已结贴√ 问题点数：20 回复次数：3

选择列表框中的多个值，然后删除

笔者要做一个 LISTBOX 列表框，实现列表内容的多项选择，然后清除所选内容，刷新列表

IF thisform.list2.ListIndex>0
thisform.list2.RemoveItem(thisform.list2.ListIndex)
ENDIF

这是笔者做的单项删除操作，，，，请问如何一次删除多项呢？

搜索更多相关主题的帖子: 如何　

2011-02-13 14:07

szweifj

等　级：论坛游民
帖　子：30
专家分：26
注　册：2010-2-10

第 2 楼

得分:0

我用了其他的方法解决了还是谢谢!

2011-02-14 13:32

szweifj

等　级：论坛游民
帖　子：30
专家分：26
注　册：2010-2-10

第 3 楼

得分:0

FOR nCnt2=1 TO thisform.list2.ListCount
    IF thisform.list2.Selected(nCnt2)   ///判断是否被选择
       thisform.list2.RemoveItem(nCnt2)
       nCnt2=0
       thisform.Refresh
    ENDIF
ENDFOR

这是我写的代码  分享一下

2011-02-14 15:21

szweifj

等　级：论坛游民
帖　子：30
专家分：26
注　册：2010-2-10

第 4 楼

得分:0

是多选如果去掉nCnt2=0,则不能完全删除所选择项,
每执行一次删除操作后,刷新表单,然后再从第一项开始检测是否被选择

2011-02-15 09:08

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-332142-1-1.html