Drawing Text on a Windows Form using the Fill Method of Graphics Class.

'Drawing Text on a Windows Form using the Fill Method of Graphics Class.

Public Class frmDrawFill

    Private Sub frmDrawText_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        'Create the Object of Graphics Class
        Dim grpx As Graphics = e.Graphics
        grpx.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias

        'Create Pen Object.
        Dim RedBrush As Brush = New SolidBrush(Color.Red)
        Dim YellowBrush As Brush = New SolidBrush(Color.FromArgb(100, Color.Yellow))

        'call Fill methods
        grpx.FillEllipse(YellowBrush, 20, 15, 100, 100)
        grpx.FillRectangle(RedBrush, 150, 10, 100, 100)

    End Sub

End Class