以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  分组统计之排序问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80517)

--  作者:文道古月
--  发布时间:2016/1/25 13:12:00
--  分组统计之排序问题

 

请问,如下代码生成的数据,是按照什么排序的,

 

如果想按照源表中的某列排序,却不想参与分组,该如何修改代码呢?

 

Dim gb As new SQLGroupTableBuilder("统计","库存") \'分组统计
        gb.C    \'数据源
        gb.Groups.AddDef("移动日期",DateGroupEnum.None) \'分组
        gb.Groups.AddDef("物料编码") \'分组
        gb.Groups.AddDef("物料描述") \'分组
        gb.Totals.AddExp("数量总计","移动数量") \'求和
        If e.Form.Controls("移动类型ComboBox1").value > "" Then
            gb.Groups.AddDef("移动类型") \'分组
        ElseIf e.Form.Controls("移动代码CheckedComboBox1").value > "" Then
            gb.Groups.AddDef("移动代码") \'分组
        ElseIf e.Form.Controls("移动单元CheckedComboBox1").value > "" Then
            gb.Groups.AddDef("移动单元") \'分组
        ElseIf e.Form.Controls("人员ComboBox1").value > "" Then
            gb.Groups.AddDef("用户名") \'分组
        End If
        gb.Filter = fit \' 条件
        e.Form.Controls("导出记录Table1").Table.Datasource = gb.BuildDataSource \'生成
    End If

[此贴子已经被作者于2016/1/25 13:28:19编辑过]

--  作者:Hyphen
--  发布时间:2016/1/25 15:03:00
--  
么有办法的,只能设置:Tables("统计").Sort
--  作者:文道古月
--  发布时间:2016/1/25 15:49:00
--  

已经生成的表,没有排序依据,只有源表有

 

怎样用代码从源表加一个排序列?


--  作者:文道古月
--  发布时间:2016/1/25 16:29:00
--  

 

添加主键便可排序,但是如何让其不参与分组呢?

 

gb.Groups.AddDef("_IDENTIFY")


--  作者:大红袍
--  发布时间:2016/1/26 0:41:00
--  

不行,不可能这样排序。

 

排序只能根据分组后的排序的。或者你加一列排序列。