Foxtable(狐表)用户栏目专家坐堂 → 交叉统计后窗口临时表的列名


  共有1540人关注过本帖树形打印复制链接

主题:交叉统计后窗口临时表的列名

帅哥,在线噢!
HJG_HB950207
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:394 积分:5997 威望:0 精华:0 注册:2015/2/17 10:18:00
交叉统计后窗口临时表的列名  发帖心情 Post By:2017/8/6 23:24:00 [只看该作者]

表A 如下列
      收费员   入站车牌    出站车牌  出口车型  入口车型  

窗口1,建临时表,执行如下代码

Dim g As New CrossTableBuilder("收费员与车型记录", DataTables("表A1"), "[出口车型] <>  [入口车型]")
g.HGroups.AddDef("出站车牌")
g.VGroups.AddDef("收费员")
g.Totals.AddDef("收费员", AggregateEnum.Count, "收费员")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 0
g.Filter = "[出口车型] <>  [入口车型]"


执行后临时表,表的各列名均为具体的收费员,而如选中表中某数据,求其对应的列名,用 Tables("窗口1_Table1").Cols(Tables("窗口1_Table1").ColSel).name  显示的列名则为:收费员_*(列号)而非临时表显示的具体收费员姓名。

求教,如何求交叉统计后临时表当前行,数据的对应列名(具体姓名,而不是用收费员_*表示)。谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/7 9:20:00 [只看该作者]

用字典先处理,再引用

 

Dim dic As new Dictionary(Of String, String)
For Each c As Col In Tables("统计表").Cols
    dic.Add(c.Caption, c.name)
Next

 

然后这样获取列名

 

Tables("窗口1_Table1").Cols(dic("张三")).Width = 50


 回到顶部