以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]删除窗体表中的选中的多行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98886)

--  作者:joe_xgp
--  发布时间:2017/4/8 16:47:00
--  [求助]删除窗体表中的选中的多行
请教大侠老师们,如何删除table中选中的多行,非常感谢!!
--  作者:有点蓝
--  发布时间:2017/4/8 17:04:00
--  
1、选择多行,然后删除
用法一,用鼠标拖选多行然后删除:
With Tables("表C")
    For i As Integer = .BottomPosition To .TopPosition Step -1
        .Rows(i).Delete
    Next
End With
需要从选择的最后一行进行删除,如果从第一行开始删除,BottomPosition就会发生变化,导致不能完全删除
参考:http://www.foxtable.com/webhelp/scr/1597.htm

用法二,勾选多行然后删除:
先开启表格复选框:http://www.foxtable.com/webhelp/scr/1776.htm
Tables("表C").ShowCheckBox = True
\'勾选多条记录后删除
For Each r As Row In Tables("表C").GetCheckedRows
    r.Delete
Next

用法三,勾选多行逻辑列然后删除:
\'勾选多条记录后删除
For Each dr As DataRow In DataTables("表C").Select("逻辑列=true")
    dr.Delete
Next
或者
DataTables("表C").DeleteFor("[逻辑列] = true")

--  作者:joe_xgp
--  发布时间:2017/4/8 17:28:00
--  
非常感谢有点甜老师! 老师不是“有点甜“,而是相当甜! !感谢老师指点!