各位大神 有人知道为什么我的图例是一行的吗。。我想改成1列4行 这个用语句怎么改呀
这样横着把AREA的区域也给占了。。。
我用的chart控件,绑定的动态的数据源。
下面是我的代码
With Me.Chart1
.DataSource = DT.DefaultView 'dt作为chart1的数据源
.Series.Clear()
.Legends.Clear()
.Legends.Add("本航班")
.Series.Add("本航班")
.Series("本航班").Legend = "本航班" '指定Legend所属Series
.Series("本航班").LegendToolTip = "本航班"
.Series("本航班").IsValueShownAsLabel = True '标签显示数据值
End With
With (Chart1.Series(0))
'指定x、y轴数据列
.YValueMembers = "本航班"
.XValueMember = "起飞前后天数"
'图表类型
.ChartType = DataVisualization.Charting.SeriesChartType.Line
End With
Chart1.ChartAreas(0).AxisX.Interval = 1
Chart1.ChartAreas(0).AxisX.MajorGrid.Enabled = False
Chart1.ChartAreas(0).AxisX.Title = "起飞前后天数"
Chart1.ChartAreas(0).AxisY.Title = "人数"
Chart1.Series.Add("同期")
Chart1.Legends.Add("同期")
Chart1.Series("同期").Legend = "同期" '指定Legend所属Series
Chart1.Series("同期").LegendToolTip = "同期"
Chart1.Series("同期").IsValueShownAsLabel = True '标签显示数据值
Chart1.Series("同期").YValueMembers = "同期"
Chart1.Series("同期").XValueMember = "起飞前后天数"
Chart1.Series("同期").ChartType = DataVisualization.Charting.SeriesChartType.Line
Chart1.Series.Add("本月")
Chart1.Legends.Add("本月")
Chart1.Series("本月").Legend = "本月" '指定Legend所属Series
Chart1.Series("本月").LegendToolTip = "本月"
Chart1.Series("本月").IsValueShownAsLabel = True '标签显示数据值
Chart1.Series("本月").YValueMembers = "本月"
Chart1.Series("本月").XValueMember = "起飞前后天数"
Chart1.Series("本月").ChartType = DataVisualization.Charting.SeriesChartType.Line
Chart1.Series.Add("同期月")
Chart1.Legends.Add("同期月")
Chart1.Series("同期月").Legend = "同期月" '指定Legend所属Series
Chart1.Series("同期月").LegendToolTip = "同期月"
Chart1.Series("同期月").IsValueShownAsLabel = True '标签显示数据值
Chart1.Series("同期月").YValueMembers = "同期月"
Chart1.Series("同期月").XValueMember = "起飞前后天数"
Chart1.Series("同期月").ChartType = DataVisualization.Charting.SeriesChartType.Line