Fill the baseline decoration with a linear gradient brush in VB

   

<Window xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  x:Class="TextDecorationExample.Window1"
  Title="TextDecoration Example"
  Width="720"
  Height="400"
  Loaded="WindowLoaded">
  <StackPanel>

      <!-- . -->
      <TextBlock Name="baselineTextBlock" FontSize="24" Width="180" VerticalAlignment="Center">The lazy dog</TextBlock>      

  </StackPanel>
</Window>
//File:Window.xaml.vb

Imports System
Imports System.Windows
Imports System.Windows.Media

Namespace TextDecorationExample
  Public Partial Class Window1
    Inherits Window
    Private Sub WindowLoaded(sender As Object, e As EventArgs)
      ' Fill the baseline decoration with a linear gradient brush.
      Dim myCollection As New TextDecorationCollection()
      Dim myBaseline As New TextDecoration()
      myBaseline.Location = TextDecorationLocation.Baseline

      ' Set the linear gradient brush.
      Dim myPen As New Pen()
      myPen.Brush = New LinearGradientBrush(Colors.Orange, Colors.Red, 0)
      myPen.Thickness = 3
      myBaseline.Pen = myPen
      myBaseline.PenThicknessUnit = TextDecorationUnit.FontRecommended

      ' Set the baseline decoration to the text block.
      myCollection.Add(myBaseline)
      baselineTextBlock.TextDecorations = myCollection
    End Sub

  End Class
End Namespace

1.	LinearGradientBrush for Rectangle.Stroke
2.	LinearGradientBrush animation
3.	LinearGradientBrush Examples
4.	Text Box with LinearGradientBrush
5.	Fill with diagonal LinearGradientBrush
6.	Rectangle with LinearGradientBrush
7.	LinearGradientBrush.RelativeTransform
8.	LinearGradientBrush.Transform RotateTransform
9.	LinearGradientBrush With 0.5 Offset for White
10.	Stroke with horizontal multi-color LinearGradientBrush
11.	Fill the overline decoration with a linear gradient brush in VB

Fill the baseline decoration with a linear gradient brush in VB : LinearGradientBrush « Windows Presentation Foundation « VB.Net

Related examples in the same category