Blend Properties : LinearGradientBrush « 2D Graphics « VB.Net Tutorial

Blend Properties
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class BlendProp
   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 brBrush As New LinearGradientBrush(New Point(0, 0), New Point(50, 20), Color.Blue, Color.Red)

        Dim blend As New Blend
        Dim factArray As Single() = {0.0F, 0.3F, 0.5F, 1.0F}
        Dim posArray As Single() = {0.0F, 0.2F, 0.6F, 1.0F}
        blend.Factors = factArray
        blend.Positions = posArray
        brBrush.Blend = blend

        g.FillRectangle(brBrush, 10, 20, 200, 100)
        g.FillEllipse(brBrush, 10, 150, 120, 120)


  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.56.1.A diagonal brushA diagonal brush
17.56.2.Create a LinearGradientBrushCreate a LinearGradientBrush
17.56.3.Set Blend Triangular Shape for LinearGradientBrushSet Blend Triangular Shape for LinearGradientBrush
17.56.4.Set Sigma Bell ShapeSet Sigma Bell Shape
17.56.5.Make a rectangle that shades from black to whiteMake a rectangle that shades from black to white
17.56.6.LinearGradientBrush: InterpolationColorsLinearGradientBrush: InterpolationColors
17.56.7.LinearGradientBrush ColorBlendLinearGradientBrush ColorBlend
17.56.8.LinearGradientBrush BlendLinearGradientBrush Blend
17.56.9.LinearGradientBrush: too short to cross the whole rectangleLinearGradientBrush: too short to cross the whole rectangle
17.56.10.Change the LinearGradientBrush's WrapModeChange the LinearGradientBrush's WrapMode
17.56.11.Trangular brushTrangular brush
17.56.12.Transform LinearGradientBrushTransform LinearGradientBrush
17.56.13.Blend PropertiesBlend Properties
17.56.14.Interpolation ColorsInterpolation Colors