vb.net - 在图表上绘制一个矩形

Question

我编写了下面的代码来绘制一个矩形并将其填充到图表上，但最后我只得到图表作为没有矩形的结果。任何想法？谢谢

公开课形式1

Dim myBrush As Brush

Public Sub Chart1_Click(sender As Object, e As EventArgs) Handles Chart1.Click


    Chart1.Series(0).Points.AddXY(0, 1)
    Chart1.Series(0).Points.AddXY(1, 2)
    Chart1.Series(0).BorderWidth = 2
    Chart1.Series(0).Color = Color.Black


End Sub

Private Sub PostPaint(sender As Object, e As System.Windows.Forms.DataVisualization.Charting.ChartPaintEventArgs) Handles Chart1.PostPaint
    myBrush = New SolidBrush(Color.Coral)
    Dim rect As Rectangle = New Rectangle(0, 0, 100, 100)
    Chart1.CreateGraphics.FillRectangle(myBrush, rect)
End Sub

结束类

标签： vb.netwinforms