Graphics.DrawPolygon : Graphics « 2D Graphics « VB.Net Tutorial






Graphics.DrawPolygon
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class DrawPolygon
   public Shared Sub Main
        Application.Run(New Form1)
   End Sub
End class


public class Form1
  Inherits System.Windows.Forms.Form

  Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs)
        Dim g As Graphics = e.Graphics
        ' Create pens
        Dim greenPen As New Pen(Color.Green, 2)
        Dim redPen As New Pen(Color.Red, 2)
        ' Create points for polygon.
        Dim p1 As New PointF(40.0F, 50.0F)
        Dim p2 As New PointF(60.0F, 70.0F)
        Dim p3 As New PointF(80.0F, 34.0F)
        Dim p4 As New PointF(120.0F, 180.0F)
        Dim p5 As New PointF(200.0F, 150.0F)
        Dim ptsArray As PointF() = {p1, p2, p3, p4, p5}
        ' Draw polygon
        e.Graphics.DrawPolygon(greenPen, ptsArray)
        ' Dispose
        greenPen.Dispose()
        redPen.Dispose()
  End Sub

  Public Sub New()
   
    MyBase.New()
    Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
    Me.ClientSize = New System.Drawing.Size(292, 273)
    Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen

  End Sub

End Class








17.40.Graphics
17.40.1.Create Graphics from HandleCreate Graphics from Handle
17.40.2.Create Graphics object from System.Windows.Forms.PaintEventArgsCreate Graphics object from System.Windows.Forms.PaintEventArgs
17.40.3.Graphics.DpiXGraphics.DpiX
17.40.4.Graphics: clear backgroundGraphics: clear background
17.40.5.Graphics.DrawArcGraphics.DrawArc
17.40.6.Graphics.DrawBeziersGraphics.DrawBeziers
17.40.7.Graphics.DrawClosedCurveGraphics.DrawClosedCurve
17.40.8.Graphics.DrawCurveGraphics.DrawCurve
17.40.9.Graphics.DrawEllipse MethodGraphics.DrawEllipse Method
17.40.10.Use Graphics.DrawEllipse to draw a circleUse Graphics.DrawEllipse to draw a circle
17.40.11.Graphics.DrawIconGraphics.DrawIcon
17.40.12.Graphics.DrawIconUnstretchedGraphics.DrawIconUnstretched
17.40.13.Graphics.DrawImageGraphics.DrawImage
17.40.14.Graphics.DrawLinesGraphics.DrawLines
17.40.15.Graphics.DrawPathGraphics.DrawPath
17.40.16.Graphics.DrawPieGraphics.DrawPie
17.40.17.Graphics.DrawPolygonGraphics.DrawPolygon
17.40.18.Graphics.DrawStringGraphics.DrawString
17.40.19.Graphics.ExcludeClipGraphics.ExcludeClip
17.40.20.Graphics.FillClosedCurveGraphics.FillClosedCurve
17.40.21.Graphics.FillEllipseGraphics.FillEllipse
17.40.22.Graphics.FillPathGraphics.FillPath
17.40.23.Graphics.FillPie 2Graphics.FillPie 2
17.40.24.Graphics.FillPolygon
17.40.25.Graphics.FillRectangleGraphics.FillRectangle
17.40.26.Graphics.FillRectanglesGraphics.FillRectangles
17.40.27.Graphics.IntersectClipGraphics.IntersectClip
17.40.28.Graphics.MeasureStringGraphics.MeasureString
17.40.29.Graphics.ReleaseHdcGraphics.ReleaseHdc
17.40.30.Graphics.ResetClipGraphics.ResetClip
17.40.31.Graphics.SetClipGraphics.SetClip