以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 修改统计表列标题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=133000)
--  作者：zcgmxf
--  发布时间：2019/4/3 17:46:00
--  [求助] 修改统计表列标题
老师，如何修改统计表的列标题？谢谢！

Dim bd5 As New CrossTableBuilder("统计表5",DataTables("狂犬病暴露门诊登记表"))
Dim dt5  As fxDataSource
bd5.HGroups.AddDef("县市区")
bd5.VGroups.AddDef("伤人动物免疫史","伤人动物免疫史_{0}")
bd5.Totals.AddDef("伤人动物免疫史", AggregateEnum.Count,"伤人动物免疫史")
dt5 = bd5.BuildDataSource()

两个选项 是 和 否

for each k as col in Tables("狂犬病门诊报表_table1").cols
    If  k.Caption = "伤人动物免疫史_是" Then
       Tables("狂犬病门诊报表_table1").grid.cols(k.Name).caption = "伤人动物有免疫史数"
    End If
next

得到的结果是 "伤人动物有免疫史数_是"  不知如何能修改为  "伤人动物有免疫史数" 谢谢！
--  作者：有点甜
--  发布时间：2019/4/3 18:34:00
--  

 

代码没问题，请上传具体实例测试，说明需要做到的效果。