以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  筛选树可否设置为按时间排序？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29647)
--  作者：jxkqf
--  发布时间：2013/3/11 10:52:00
--  筛选树可否设置为按时间排序？
设置筛选树后，可否把符合条件的记录按时间（表中有日期列）先后排序显示？并在末行显示合计数字？
--  作者：jxkqf
--  发布时间：2013/3/11 10:57:00
--  
我要的是要在筛选树中排序，不是TABLE排序。
--  作者：jxkqf
--  发布时间：2013/3/11 11:10:00
--  

非常感谢。我再仔细看看。

 
--  作者：狐狸爸爸
--  发布时间：2013/3/11 11:11:00
--  

你可以用这个事件：

http://www.foxtable.com/help/topics/2060.htm

 

设置AfterFilter代码：

 

Tables("订单").Sort = “日期”

Dim t As Table = Tables("订单")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "数量,金额"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()

 

这样每次筛选后，就会自动排序，自动生成汇总行。
--  作者：jxkqf
--  发布时间：2013/3/11 11:11:00
--  
并在末行显示合计数字. 如何实现?
--  作者：jxkqf
--  发布时间：2013/3/11 15:03:00
--  

6楼的代码，可行。

谢谢。