Clip Region Exclude : Clip « 2D Graphics « VB.Net Tutorial

Clip Region Exclude
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class ClipRegionExclude
   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 = Me.CreateGraphics()
        Dim pen As New Pen(Color.Red, 5)
        Dim brush As New SolidBrush(Color.Red)
        Dim rect1 As New Rectangle(50, 0, 50, 150)
        Dim rect2 As New Rectangle(0, 50, 150, 50)
        Dim [region] As New [Region](rect1)
        g.FillRegion(brush, [region])

  End Sub

  Public Sub 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.20.2.Rectangle clipped to EllipseRectangle clipped to Ellipse
17.20.3.Clip RegionClip Region
17.20.4.Clip Region XorClip Region Xor
17.20.5.Clip Region UnionClip Region Union
17.20.6.Clip Region ExcludeClip Region Exclude
17.20.7.Clip Region IntersectClip Region Intersect
17.20.8.Clip by GraphicPathClip by GraphicPath