Dim p As WinForm.Painter = e.Form.Controls("Painter1")
Dim g As Graphics = p.Graphics
Dim points(2) As Point
points(0) = New Point(10, 10)
points(1) = New Point(10, 100)
points(2) = New Point(50, 10)
Dim Brushes As New LinearGradientBrush(points(0),points(1),Color.red,Color.Green)
g.FillPolygon(Brushes, points)
p.Repaint()
Painter1 这个控件怎么加?