 |
当ShowLegend属性设置为True后，MSChart控件将显示图例，默认的图例文字是C1、C2等。我们可以利用MSChart.Plot.SeriesCollection(x).LegendText来设置图例文字。这里的x表示数据序列的序号，从1开始。这个属性支持中文。你可以在窗体上放置一个MSChart控件，然后输入以下代码：
Private Sub Form_Load()
Dim arrData(1 To 3, 1 To 3)
MSChart1.ShowLegend = True
arrData(1, 1) = "一月" ' 在第一列设置标签。
arrData(2, 1) = "二月"
arrData(3, 1) = "三月"
arrData(1, 2) = 8
arrData(2, 2) = 4
arrData(3, 2) = 0.3
arrData(1, 3) = 0.2
arrData(2, 3) = 3
arrData(3, 3) = 6.3
MSChart1.ChartData = arrData
MSChart1.Plot.SeriesCollection(1).LegendText = "损耗额(百万)"
MSChart1.Plot.SeriesCollection(2).LegendText = "利润额(百万)"
End Sub
运行结果见图1。
图1 MSChart控件显示中文图例文字
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, 图形、图象, picture, graph, image, draw。
|
MSChart控件怎样显示图例
