锁定 MSChart 网格线答案

【问题标题】：Lock MSChart Gridlines锁定 MSChart 网格线
【发布时间】：2010-02-18 18:23:35
【问题描述】：

如何使用 MSChart 执行以下操作？

将轴设置为 x：[0 - 1000] 和 y：[0 - 1]。
当图表没有点时显示网格线。
禁用网格线的自动调整。

注意：如果边界内存在点，则设置 Axis(X/Y).(Min/Max)imum 似乎无效。

【问题讨论】：

标签： vb.net mschart

【解决方案1】：

Bentley Davis 通过设置 X 轴和 Y 轴的最小值和最大值很好地回答了问题 1)。

问题 3) 要求每个轴多一个属性； .Interval 属性。如果您不设置间隔，MSChart 将自动在您声明的最小值和最大值之间进行最佳拟合间隔，从而可能会更改网格线和标签的位置。

  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）：您必须向某些系列添加至少 1 个数据点才能显示网格线。没有办法解决这个问题。当我想复制该行为时，我将以下系列添加到我的图表中：

  Dim nSer As Series = Chart1.Series.Add("fake_Series")
  nSer.ChartType = SeriesChartType.Point
  nSer.MarkerSize = 0
  nSer.Points.Add(2000, 2)

图表上不显示点，但显示网格线。

【讨论】：

【解决方案2】：

我无法重现您的问题。当我设置轴和网格线显示时，我将网格线添加到不更改。你似乎说他们确实改变了。这是我正在使用的代码。如果我能看到示例代码，我可能会提供帮助。

    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)

【讨论】：

我把除了 AddXY 的所有东西都放在了 form.load 中，AddXY(100, 0.5) 放在了 button1.click 中，还有 AddXY(200, 0.6)。当表单加载时，不显示网格线（req 2）。单击按钮 1 并注意网格线。单击按钮 2 并注意 x 轴标签重新调整（req 3）。