标题:[求助]如何删除listbox中的选中项目
只看楼主
lyh820803
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-4-6
 问题点数:0 回复次数:1 
[求助]如何删除listbox中的选中项目
如何删除listbox中的选中项目.就是在listbox有若干项目.我有一个删除按钮.我想实现一按删除键就能删除listbox中我点选的项目
搜索更多相关主题的帖子: listbox 项目 删除 
2005-04-11 20:33
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
得分:0 

Option Explicit

Private Sub Command1_Click() Dim i As Long For i = List1.ListCount - 1 To 0 Step -1 If List1.Selected(i) = True Then List1.RemoveItem i End If Next End Sub '注意,要从后往前删除


天津网站建设 http://www./
2005-04-11 22:30



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




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.401613 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved