以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何让空行不参加排序？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88331)
--  作者：wuzhouji
--  发布时间：2016/8/1 9:16:00
--  [求助]如何让空行不参加排序？
如题，表中有很多空行，如何只对非空的行排序，把空行排除？
--  作者：cbt
--  发布时间：2016/8/1 9:21:00
--  
 筛选一下，把空行的排除掉
--  作者：wuzhouji
--  发布时间：2016/8/1 9:48:00
--  自制ftp文件管理器如何实现文件修改后同步更新？
空行还是要保留的，不能筛选掉
--  作者：大红袍
--  发布时间：2016/8/1 9:56:00
--  

写代码

 

Dim i As Integer = 1
For Each dr As DataRow In DataTables("表a").Select("第一列 is not null", "第一列")
    dr("_Sortkey") = i
    i += 1
Next
DataTables("表a").replacefor("_Sortkey", Long.MaxValue , "第一列 is null")