| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]关于日期空值的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88578) |
| -- 作者：p6641 -- 发布时间：2016/8/5 10:42:00 -- [求助]关于日期空值的问题 我有一张表，有个字段是发货日期，在生成统计时用日期进行分组，空值的表头该怎么设置？比方空值的表头设为未发货 |
| -- 作者：大红袍 -- 发布时间：2016/8/5 11:26:00 -- 交叉统计？
For each c as col in tables("表A").cols |
| -- 作者：p6641 -- 发布时间：2016/8/5 15:23:00 -- 大红袍老师，这段代码应该放在哪个位置？好像不行。是交叉统计 是在窗口中的按键的代码 [此贴子已经被作者于2016/8/5 15:24:59编辑过]
|
| -- 作者：p6641 -- 发布时间：2016/8/5 15:33:00 -- Dim g As New CrossTableBuilder("统计表1", DataTables("出口情况表")) g.H Groups.AddDef("客户") \'g.V Groups.AddDef("是否发货","已发货|未发货") For E ach c As Col In Tables("统计表1").cols \'mes sagebox.show(c.caption) If c.Caption.Contains("空") Then c.Caption = c.Caption.Replace("空", "未发货") \'me ssagebox.show(c.caption) E nd If Next Tab les("统计表1").DataTable.BuildHeader g.V Groups.AddDef("发货日期", DateGroupEnum.Year, "{0}年") g.To tals.AddDef("净重", "净重") g.To tals.AddDef("总值", "总值") g.To tals.AddDef("预付款", "预付款") g.To tals.AddDef("收货款", "收货款") g.To tals.AddDef("扣款", "扣款") g.To tals.AddDef("余款", "余款") g.To tals.AddDef("发货日期", AggregateEnum.Count, "发货次数") g.Ho rizontalTotal = True g.V erticalTotal = True g.D ecimals = 2 g.B uild() Tab les("出口情况查询_Table2").DataSource = g.BuildDataSource() Tab les("出口情况查询_table2").Cols.Frozen = 1 Tab les("出口情况查询_table2").AutoSizeCols [此贴子已经被作者于2016/8/5 15:39:28编辑过]
|
| -- 作者：大红袍 -- 发布时间：2016/8/5 15:48:00 -- 写到最后
Dim t As Table = Tables("出口情况查询_Table2") For each c as col in t.cols |
| -- 作者：p6641 -- 发布时间：2016/8/5 15:51:00 -- OK,刚好自己也调试成功了。 |