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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 当天统计

共有2197人关注过本帖树形打印复制链接主题：当天统计

denghui69986

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

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

当天统计

Post By：2024/6/16 8:46:00 [显示全部帖子]

做了一个当天弹窗统计，下面截图那样的，统计数量和金额统计不出来，老师帮忙看看，谢谢

代码设置按键统计

Dim cnt As Integer

Dim b As New GroupTableBuilder("统计表1", DataTables("订单"))

cnt = cnt + 1

b.Filter = "日期='" & Date.Today & "'"

b.Build '生成统计表

If cnt > 0 Then

messagebox.show("今日录入" & cnt & "笔订单，共合计 " & ("Sum(数量)PCS") &收入 ("Sum(金额)元"))

End If

此主题相关图片如下：桌面弹窗.png

denghui69986

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

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2024/6/17 16:07:00 [显示全部帖子]

谢谢，找到方法了已解决

主题：当天统计