主题：GDI+ 绘制渐变色 成功

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 这个控件怎么加？