Use LinearGradientBrush to draw string : Draw string « 2D Graphics « VB.Net Tutorial






Use LinearGradientBrush to draw string
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class ColorBlending
   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()
        g.Clear(Me.BackColor)

        Dim rgBrush As New LinearGradientBrush(New RectangleF(20, 20, 100, 100), Color.Red, Color.Green, LinearGradientMode.Horizontal)
        Dim yrBrush As New LinearGradientBrush(New RectangleF(140, 20, 150, 300), Color.Yellow, Color.Red, LinearGradientMode.ForwardDiagonal)
        Dim rbBrush As New LinearGradientBrush(New RectangleF(10, 10, 50, 50), Color.Red, Color.Blue, LinearGradientMode.ForwardDiagonal)

        g.FillRectangle(rgBrush, 20, 20, 100, 100)
        g.FillEllipse(yrBrush, 140, 20, 200, 200)
        g.DrawString("Color Blending", New Font("Tahoma", 30), rbBrush, New RectangleF(100, 240, 300, 300))


        ' Dispose
        g.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.28.Draw string
17.28.1.Print string in 3DPrint string in 3D
17.28.2.Draw string with Brush and Font settingsDraw string with Brush and Font settings
17.28.3.Text outlineText outline
17.28.4.Text ShadowText Shadow
17.28.5.Text ContrastText Contrast
17.28.6.Rotate and Transoform in Text paintingRotate and Transoform in Text painting
17.28.7.Transform TextTransform Text
17.28.8.Use LinearGradientBrush to draw stringUse LinearGradientBrush to draw string
17.28.9.Transparent stringTransparent string