以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用代码如何删除4行以后的所有行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69764)

--  作者:lihe60
--  发布时间:2015/6/10 15:11:00
--  用代码如何删除4行以后的所有行
如题
--  作者:大红袍
--  发布时间:2015/6/10 15:12:00
--  
For i As Integer = Tables("表a").Rows.Count - 1 To 4 Step -1
    Tables("表a").Rows(i).Delete
Next

--  作者:Bin
--  发布时间:2015/6/10 15:13:00
--  
datatables("X").deletefor("_SortKey>" & tables("X").rows(3)("_SortKey"))