以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]两个图表互相影响的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=67625) |
-- 作者:老奤 -- 发布时间:2015/4/27 22:43:00 -- [求助]两个图表互相影响的问题 图一 点击”走户日线“图标显示如下图,一切正常 图二 再点击”走户进度“图标显示如下图,一切正常 图三 再点击”走户日线“图标显示如下,好像受到了”走户进度“的影响,有点乱了,x轴出现的走户进度的分类 问题综述:只要点击走户进度后就会影响走户日线,反之不会。请问各位老师问题出在哪? 走户进度事件代码 If DataTables.Contains("走户进度表") = False Then \'不存在这个表 Dim g As New GroupTableBuilder("走户进度表", DataTables("十二组")) g.Caption = "走户进度表" g.Groups.AddDef("居民组", "居民小组") g.Totals.AddDef("居民组", AggregateEnum.Count, "总户数") g.Totals.AddDef("协议日期", AggregateEnum.Count, "走户数") g.Build() End If Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表 Chart.VisualEffect = False \'风格 Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形) Chart.DataSource = "走户进度表" \'设置绑定表 Chart.SeriesList.Clear() \'清除图表原来的图系 Series = Chart.SeriesList.Add() \'增加第一个图系 Series.Text = "契证总数" Series.X.DataField = "居民小组" \'X轴绑定到产品列 Series.Y.DataField = "总户数" \'Y轴绑定到数量列 Series.DataLabelText = "{#YVAL}" \'显示数值 Series = Chart.SeriesList.Add() \'增加第二个图系 Series.Text = "走户总数" Series.X.DataField = "居民小组" \'X轴绑定到产品列 Series.Y.DataField = "走户数" \'Y轴绑定到数量列 Chart.LegendVisible = True \'显示图列 Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端) Series.DataLabelText = "{#YVAL}" \'显示数值 Chart.Stacked = False \'图形叠加 Chart.BarClusterWidth = 60 \'横向宽度 走户日线事件代码 If DataTables.Contains("走户日线表") = False Then \'不存在这个表 Dim g As New GroupTableBuilder("走户日线表", DataTables("十二组")) g.Caption = "走户日线表" g.Groups.AddDef("协议日期", DateGroupEnum.Day, "日期", "日期") g.Totals.AddDef("协议日期", AggregateEnum.Count, "走户") g.Build() End If Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表 Chart.VisualEffect = False \'风格 Chart.ChartType = ChartTypeEnum.XYPlot \'图表类型 Chart.DataSource = "走户日线表" \'设置绑定表 Chart.SeriesList.Clear() \'清除图表原来的图系 Series = Chart.SeriesList.Add() \'增加第一个图系 Series.Text = "日期" Series.X.DataField = "日期" \'X轴绑定到产品列 Series.Y.DataField = "走户" \'Y轴绑定到数量列 Chart.LegendVisible = True \'显示图列 Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端) Series.DataLabelText = "{#YVAL}" \'显示数值 Chart.Stacked = False \'图形叠加 |
-- 作者:老奤 -- 发布时间:2015/4/27 23:22:00 -- 顶一下,别沉了 |
-- 作者:老奤 -- 发布时间:2015/4/28 8:18:00 -- 各位老师帮帮忙呀 |
-- 作者:Bin -- 发布时间:2015/4/28 8:50:00 -- Chart.SeriesList.Clear() \'清除图表原来的图系 执行了这个理应不会,具体请上个例子看看 |
-- 作者:老奤 -- 发布时间:2015/4/28 9:12:00 -- 密码12121212,在统计中心的图表里,老师受累给看看 |
-- 作者:老奤 -- 发布时间:2015/4/28 9:13:00 -- [此贴子已经被作者于2015/4/28 21:43:07编辑过]
|
-- 作者:Bin -- 发布时间:2015/4/28 9:32:00 -- 开发者密码? |
-- 作者:老奤 -- 发布时间:2015/4/28 9:37:00 -- 12121212 |
-- 作者:Bin -- 发布时间:2015/4/28 9:45:00 -- 如何重新问题 |
-- 作者:Bin -- 发布时间:2015/4/28 9:45:00 -- 如何重现问题? |