以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  统计结果导入固定表的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147621)

--  作者:670163008
--  发布时间:2020/3/20 15:31:00
--  统计结果导入固定表的问题

Dim g As New CrossTableBuilder("统计表1", DataTables("稿件"))

g.HGroups.AddDef("单位")

g.VGroups.AddDef("类型")

g.Totals.AddDef("标题", AggregateEnum.Count)

g.Build()

For Each rr As Row In Tables("统计表1").rows

    Dim drr As DataRow = DataTables("单位").Find("单位名称=\'" & rr("单位") & "\'")

    If drr  IsNot Nothing Then

        drr("文字稿件") = rr("文字稿件")

        drr("视频稿件") = rr("视频稿件")

    End If

Next

MainTable = Tables("单位")


--  作者:670163008
--  发布时间:2020/3/20 15:32:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200320153138.png
图片点击可在新窗口打开查看

--  作者:y2287958
--  发布时间:2020/3/20 15:34:00
--  
“文字稿件”是列标题,不是列名称,要使用真正的列名称。
--  作者:670163008
--  发布时间:2020/3/20 15:51:00
--  
。。。。。。。。。。那这个列名称
--  作者:670163008
--  发布时间:2020/3/20 16:01:00
--  
标题_1  和  标题_2    原来这样