How to draw Gradient Vertical String on form using Vb.Net?

Draw Gradient Vertical Given String on the form...

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim StringFormat As New StringFormat()
        Dim GradientRectangle As New Rectangle(10, 10, 100, 100)
        Using GradientGraphic = Me.CreateGraphics()
             Using GradientBrush As New LinearGradientBrush(GradientRectangle, Color.Red, Color.Blue, LinearGradientMode.ForwardDiagonal)
               StringFormat.FormatFlags = StringFormatFlags.DirectionVertical
                 GradientGraphic.DrawString("Gradient vertical string by James J", New System.Drawing.Font("Impact", 35, FontStyle.Bold), GradientBrush, 2.0, 12.0, StringFormat)
            End Using
        End Using
End Sub

> See below image