找出首次日期 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 找出首次日期

共有4007人关注过本帖树形打印复制链接主题：找出首次日期

tld

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：739 积分：7694 威望：0 精华：0 注册：2017/2/3 10:29:00

找出首次日期 发帖心情

Post By：2023/3/28 16:06:00 [只看该作者]

老师好。表中有销售日期列，下列代码希望显示首次销售日期、最近销售日期、销售次数。请老师指教，谢谢！

Dim b As New SQLGroupTableBuilder("统计表1", dt.Name)

b.C

b.Groups.AddDef("单位名称")

b.Totals.AddDef("费用")

b.Totals.AddExp("首单日期", "-----------------")

b.Totals.AddExp("末单日期", "-----------------")

b.Totals.AddExp("成交次数", "-----------------")

b.Build

Tables(e.form.name & "_table1").DataSource = b.BuildDataSource()

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/3/28 16:21:00 [只看该作者]

b.Totals.AddExp("首单日期", AggregateEnum.min)

b.Totals.AddExp("末单日期", AggregateEnum.max)

b.Totals.AddExp("成交次数", AggregateEnum.count)

在Totals集合中添加一个统计列的语法如下：　

Totals.AddDef(Name)
Totals.AddDef(Name, NewName)
Totals.AddDef(Name, NewName, NewCaption)
Totals.AddDef(Name, Aggregate)
Totals.AddDef(Name, Aggregate, NewName)
Totals.AddDef(Name, Aggregate, NewName, NewCaption)

参数说明　

Name: 字符型，指定统计列。
NewName: 字符型，用于给统计列指定一个新的名称，这个名称在统计表中显示。
NewCaption: 字符型，用于给统计列设置标题。
Aggregate： AggregateEnum枚举型，用于指定统计类型，默认是求和。

AggregateEnum型枚举的可选值：

Average：平均值
Count：记录数
Max：    最大值
Min：    最小值
Sum：    累积值

tld

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：739 积分：7694 威望：0 精华：0 注册：2017/2/3 10:29:00

Post By：2023/3/28 16:37:00 [只看该作者]

老师，下列代码出现错误

Dim b As New SQLGroupTableBuilder("统计表1", dt.Name)

b.C

b.Groups.AddDef("单位名称")

b.Totals.AddDef("费用")

b.Totals.AddExp("日期", AggregateEnum.Min , "首单日期")

b.Totals.AddExp("日期", AggregateEnum.Max , "末单日期")

b.Totals.AddExp("日期", AggregateEnum.Count , "成交次数")

b.Build

Tables(e.form.name & "_table1").DataSource = b.BuildDataSource()

此主题相关图片如下：捕获.png

[此贴子已经被作者于2023/3/28 16:37:16编辑过]

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/3/28 16:42:00 [只看该作者]

AddExp改为AddDef

tld

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：739 积分：7694 威望：0 精华：0 注册：2017/2/3 10:29:00

Post By：2023/3/28 16:46:00 [只看该作者]

老师，知道哪里错了。谢谢

下一主题 >> << 上一主题

主题：找出首次日期