- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 图重叠了， (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185903)
-- 发布时间：2023/3/24 12:02:00
-- 图重叠了，
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.bar \'图表2类型该为线形
Chart.DataSource = tjt.name \'设置绑定表
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 = "金额"
生成的图重叠了，怎么才能不重叠
此主题相关图片如下：无标题.png
-- 发布时间：2023/3/24 13:33:00
--
把前面的图形宽度改改：http://www.foxtable.com/webhelp/topics/0989.htm