如何使用MSChart完成以下操作?
当图表没有points.
注意:设置Axis(X/Y).(Min/Max)imum似乎没有效果,如果边界内存在一个点。
发布于 2010-02-23 14:38:26
问题1)通过设置X和Y轴的最小值和最大值,Bentley Davis很好地回答了问题1。
问题3)每个轴需要多一个属性;.Interval属性。如果不设置间隔,MSChart将自动在声明的min和max之间执行最佳匹配间隔,从而可能更改网格线和标签的位置。
Chart1.Legends.Clear()
Chart1.Series("Series1").ChartType = SeriesChartType.FastLine
With Chart1.ChartAreas(0)
.AxisX.Maximum = 1000
.AxisX.Minimum = 0
.AxisY.Maximum = 1
.AxisY.Minimum = 0
.AxisX.Interval = 200
End With
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Chart1.Series("Series1").Points.AddXY(100, 0.5)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Chart1.Series("Series1").Points.AddXY(200, 0.6)
End Sub问题2):必须向某些系列中添加至少一个数据点才能显示网格线。这是无可奈何的。当我想复制图表时,我会将以下系列添加到我的图表中:
Dim nSer As Series = Chart1.Series.Add("fake_Series")
nSer.ChartType = SeriesChartType.Point
nSer.MarkerSize = 0
nSer.Points.Add(2000, 2)该点不显示在图表上,而是显示网格线。
发布于 2010-02-23 05:29:18
我无法重现你的问题。当我设置轴和网格线显示,然后我添加点,网格线,以不计吨位。你好像说他们确实变了。这是我正在使用的代码。如果我能看到示例代码,我可能会帮上忙。
Chart1.Series("Series1").ChartType = SeriesChartType.FastLine
Chart1.ChartAreas(0).AxisX.Maximum = 1000
Chart1.ChartAreas(0).AxisX.Minimum = 0
Chart1.ChartAreas(0).AxisY.Maximum = 1
Chart1.ChartAreas(0).AxisY.Minimum = 0
Chart1.Series("Series1").Points.AddXY(100, 0.5)
Chart1.Series("Series1").Points.AddXY(200, 0.6)https://stackoverflow.com/questions/2291090
复制相似问题