- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 窗口统计图表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183672)
-- 发布时间：2022/11/12 10:44:00
-- 窗口统计图表
在同一个窗口上用两个不同表的统计图，试了几次都是有一个图表乱的，一个就可以，二个图就不可以，下面代码帮忙看看，代码我放在窗口
谢谢
谢谢
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart2") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar \'图表1类型该为Bar(条形)
Chart.ChartType2 = ChartTypeEnum.XYPlot \'图表2类型该为线形
Chart.DataSource = "空白表" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'给图表1增加一个图系
Series.Text = "生产数量"
Series.X.DataField = "加工厂" \'X轴绑定到产品列
Series.Y.DataField = "生产数量" \'Y轴绑定到数量列
Chart.SeriesList2.Clear() \'清除图表原来的图系
Series = Chart.SeriesList2.Add() \'给图表2增加一个图系
Series.Text = "生产柜数"
Series.X.DataField = "加工厂" \'X轴绑定到产品列
Series.Y.DataField = "生产柜数" \'Y轴绑定到数量列
Chart.LegendVisible = True \'显示图列
Chart.LegendCompass = CompassEnum.South \'图列显示在南方(底端)
Chart.AxisY.Text = "生产数量"
Chart.AxisY2.Text = "生产柜数"
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar \'图表1类型该为Bar(条形)
Chart.ChartType2 = ChartTypeEnum.XYPlot \'图表2类型该为线形
Chart.DataSource = "统计表1" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'给图表1增加一个图系
Series.Text = "数量"
Series.X.DataField = "月份" \'X轴绑定到产品列
Series.Y.DataField = "数量" \'Y轴绑定到数量列
Chart.SeriesList2.Clear() \'清除图表原来的图系
Series = Chart.SeriesList2.Add() \'给图表2增加一个图系
Series.Text = "柜数"
Series.X.DataField = "月份" \'X轴绑定到产品列
Series.Y.DataField = "柜数" \'Y轴绑定到数量列
Chart.LegendVisible = True \'显示图列
Chart.LegendCompass = CompassEnum.South \'图列显示在南方(底端)
Chart.AxisY.Text = "数量"
Chart.AxisY2.Text = "柜数"
-- 发布时间：2022/11/12 10:54:00
--
什么地方乱？提示什么错误？
-- 发布时间：2022/11/12 10:57:00
--
-- 发布时间：2022/11/12 10:59:00
--
定义了重复的变量名称，换个不同的名称
-- 发布时间：2022/11/12 11:22:00
--
把临时统计表改成添加了一个正式表还是一样不可以，帮忙看看上面代码是不是那里问题，谢谢
-- 发布时间：2022/11/12 11:25:00
--
什么地方不可以？
-- 发布时间：2022/11/12 11:32:00
--
弹窗提示
-- 发布时间：2022/11/12 11:35:00
--
定义了重复的变量名称，换个不同的名称啊，在同一个事件不能出现2个相同的变量名称
此主题相关图片如下：1.png
-- 发布时间：2022/11/12 11:38:00
--
指导应该怎么改，谢谢
-- 发布时间：2022/11/12 11:41:00
--
换个不同的名称都不会？！
……
Series.Y.DataField = "生产柜数" \'Y轴绑定到数量列
Chart.LegendVisible = True \'显示图列
Chart.LegendCompass = CompassEnum.South \'图列显示在南方(底端)
Chart.AxisY.Text = "生产数量"
Chart.AxisY2.Text = "生产柜数"
Dim 张三 As WinForm.Chart \'定义一个图表变量
Dim 李四 As WinForm.ChartSeries \'定义一个图系变量
张三= e.Form.Controls("Chart1") \' 引用窗口中的图表
张三.VisualEffect = True \'加上这一行,让你的图表更漂亮
张三.ChartType = ChartTypeEnum.Bar \'图表1类型该为Bar(条形)
张三.ChartType2 = ChartTypeEnum.XYPlot \'图表2类型该为线形
张三.DataSource = "统计表1" \'设置绑定表
张三.SeriesList.Clear() \'清除图表原来的图系
李四 = 张三.SeriesList.Add() \'给图表1增加一个图系
……