Chartコントロールを使ってグラフ描画に挑戦しています。

データを表示させる前に、グラフを表示させるところでつまづきました。

ChartTypeをPointに設定して、↓のコードでグラフを表示させようとすると、
Chartが真っ白になってしまいます。


描きたいグラフは、
X軸: 0～1023 (10bit)
Y軸: 0～1023 (10bit)
でY軸、X軸ともに511の所で交わるようにしたいです。
(↓のコードもそのつもりで設定しています。）


○Chart1の"Seriesコレクションエディター"

ChartArea: ChartArea1
ChartType: Point






○試しているコード
        Dim minX As Double = 0
        Dim maxX As Double = 1023
        Dim minY As Double = 0
        Dim maxY As Double = 1023

        Chart1.ChartAreas(0).AxisX.Crossing = 511
        Chart1.ChartAreas(0).AxisX.Maximum = maxX
        Chart1.ChartAreas(0).AxisX.Minimum = minX
        Chart1.ChartAreas(0).AxisY.Crossing = 511
        Chart1.ChartAreas(0).AxisY.Maximum = maxY
        Chart1.ChartAreas(0).AxisY.Minimum = minY

        ' Set Arrow Style
        Chart1.ChartAreas("ChartArea1").AxisY.ArrowStyle = AxisArrowStyle.SharpTriangle
        Chart1.ChartAreas("ChartArea1").AxisX.ArrowStyle = AxisArrowStyle.SharpTriangle
        Chart1.ChartAreas("ChartArea1").AxisY.Title = "Y軸"
        Chart1.ChartAreas("ChartArea1").AxisX.Title = "X軸"
        ' Enable all elements
        Chart1.ChartAreas("ChartArea1").AxisX.MinorGrid.Enabled = True
        Chart1.ChartAreas("ChartArea1").AxisX.MinorTickMark.Enabled = True
        Chart1.ChartAreas("ChartArea1").AxisY.MinorGrid.Enabled = True
        Chart1.ChartAreas("ChartArea1").AxisY.MinorTickMark.Enabled = True

        ' Set Grid lines and tick marks interval
        Chart1.ChartAreas("ChartArea1").AxisX.MajorGrid.Interval = 1
        Chart1.ChartAreas("ChartArea1").AxisX.MajorTickMark.Interval = 1
        Chart1.ChartAreas("ChartArea1").AxisX.MinorGrid.Interval = 0.1
        Chart1.ChartAreas("ChartArea1").AxisX.MinorTickMark.Interval = 0.1
        Chart1.ChartAreas("ChartArea1").AxisY.MajorGrid.Interval = 1
        Chart1.ChartAreas("ChartArea1").AxisY.MajorTickMark.Interval = 1
        Chart1.ChartAreas("ChartArea1").AxisY.MinorGrid.Interval = 0.1
        Chart1.ChartAreas("ChartArea1").AxisY.MinorTickMark.Interval = 0.1

        Chart1.ChartAreas("ChartArea1").AxisX.Interval = 1
        Chart1.ChartAreas("ChartArea1").AxisY.Interval = 1

        ' Set Line Color
        Chart1.ChartAreas("ChartArea1").AxisX.MinorGrid.LineColor = Color.SkyBlue
        Chart1.ChartAreas("ChartArea1").AxisX.MajorGrid.LineColor = Color.SkyBlue

        Chart1.ChartAreas("ChartArea1").AxisY.MinorGrid.LineColor = Color.SkyBlue
        Chart1.ChartAreas("ChartArea1").AxisY.MajorGrid.LineColor = Color.SkyBlue

        ' Set Line Style
        Chart1.ChartAreas("ChartArea1").AxisX.MajorTickMark.LineDashStyle = ChartDashStyle.Solid
        Chart1.ChartAreas("ChartArea1").AxisX.MinorGrid.LineDashStyle = ChartDashStyle.Dot

        Chart1.ChartAreas("ChartArea1").AxisY.MajorTickMark.LineDashStyle = ChartDashStyle.Solid
        Chart1.ChartAreas("ChartArea1").AxisY.MinorGrid.LineDashStyle = ChartDashStyle.Dot

        ' Set Line Width
        Chart1.ChartAreas("ChartArea1").AxisX.MajorGrid.LineWidth = 1
        Chart1.ChartAreas("ChartArea1").AxisY.MajorGrid.LineWidth = 1