确实是堆叠的原因,去掉Chart.Stacked = True就可以
只能考虑使用第二个图表做了
Chart.SeriesList2.Clear() '清除图表原来的图系
Series = Chart.SeriesList2.Add() '给图表2增加一个图系
Series.Text = "均线"
Series.Length = t.Rows.Count
chart.AxisY2.ForeColor = Color.White
chart.AxisY2.GridMajorVisible = False
chart.AxisY2.GridMinorVisible = False
chart.AxisY.Max = 40 ‘设置Y轴的最大值,和图1一致
chart.AxisY.Min = 0 '设置Y轴的最小值,和图1一致
Series.LineThickNess = 2
Series.LineColor = Color.Red
Series.MarkSize = 0
For k As Integer = 0 To t.Rows.Count '指定每个数据点的位置
Series.X(k) = k '
Series.Y(k) = 28 '指定均线值
Next