日期:2014-05-18  浏览次数:20558 次

关于批量删除数据的问题
比如我的List Control控件里有这样几条记录

  1 df dfs
  2 df sdf
  3 gs sfg
  4 sd adg
  当我按住键盘的shift键从选中第2和第3条记录 我要如何实现把着两条记录给删除的啊?

  麻烦各位大侠指点一二

------解决方案--------------------
首先是单击鼠标消息变底色
然后是检测按键消息进行判断
再就是把选中的清空就行了嘛
------解决方案--------------------
vb?
dim list as string
for i=0 to list1.listcount-1
if list1.selected(i) then list=list & str(list1.list(i))
next i
list="delete from tb where id in(" & replace(ltrim(list)," ",",") & ")"
conn.execute list