- 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=55374)
-- 发布时间：2014/8/15 11:40:00
-- 图表显示多列，能否通过目录树动态不屏蔽想要展示的列？
各位老师好，图表中显示多个字段，目前是写死的，遍历每个列，哪些列不显示的给屏蔽掉。
If dc.Name <> "消费门店" And dc.Name <> "日期" And dc.Name <> "年份" And dc.Name <> "注册单位" Then
这个是写死的，同时显示了 MA7 和 MA30 两列 ，能不能通过勾选，只显示 MA7 这一列 或者 MA30 这一列
能不能这个是动态的，比如在目录树上面勾选的，就不屏蔽，显示在图表中
此主题相关图片如下：目录树.png
表数据：
此主题相关图片如下：表数据.png
For Each dc As DataCol In dt.dataCols
If dc.Name <> "消费门店" And dc.Name <> "日期" And dc.Name <> "年份" And dc.Name <> "注册单位" Then
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Text = dc.Name \'设置图系的标题
Series.X.DataField = "日期" \'X轴绑定到产品列
Series.Y.DataField = dc.Name \'设置Y轴的绑定列
End If
Next
[此贴子已经被作者于2014-8-15 11:44:17编辑过]
-- 发布时间：2014/8/15 11:44:00
--
当然可以,遍历所有节点,判断Checked属性, 是TRue的就取之作为列名使用
-- 发布时间：2014/8/15 11:44:00
--
Dim str As String = "消费门店|日期|年份|注册单位"
For Each dc As DataCol In dt.dataCols
If str.Contains(dc.Name) = False Then
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Text = dc.Name \'设置图系的标题
Series.X.DataField = "日期" \'X轴绑定到产品列
Series.Y.DataField = dc.Name \'设置Y轴的绑定列
End If
Next