以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  分类汇总可否显示汇总项目数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=97215)

--  作者:hopestarxia
--  发布时间:2017/3/8 10:13:00
--  分类汇总可否显示汇总项目数
窗口中有一个SQL查询表,添加了一个分类汇总的按钮(代码见图),点击出来数据如下(见图):
请问是否可以在每个分类项前面加上序号,
出现的汇总行这样:
1 合同号  0088541  小计

2 合同号  1063026  小计

3 ...............................

这样就能一下子就可以看到按条件查询出来的符合条件的项目共有多少个。

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170308100803.png
图片点击可在新窗口打开查看
请问老师这样怎么实现。
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170308100128.png
图片点击可在新窗口打开查看


--  作者:有点色
--  发布时间:2017/3/8 10:35:00
--  

参考

 

\'首先要生成汇总模式
Dim r As Row
Dim idx As Integer = 1
For i As Integer = 0 To Tables("订单").Rows.Count(True) - 1
    r = Tables("订单").Rows(i,True)
    If r.IsGroup
        r("金额") = idx & " " & r("金额")
        idx += 1
    End If
Next


--  作者:hopestarxia
--  发布时间:2017/3/8 11:36:00
--  
谢谢老师