Problem:

   You want to want to write a text string on a label vertically, top to bottom (rotated 90 degrees clockwise)

Solution

   Draw the string on the label using the Graphics DrawString method.    Use the FormatFlags Property of the System.Drawing.StringFormat Class, selecting DirectionVertical from the StringFormatFlags Enumeration.

Code

   If that sounds technical, it’s only because there are several steps involved, but it isn’t really as complicated as it might seem.     Let’s start with the code, then we can break it down into understandable steps.

    Place a label named Label1 on a form.   Put this Imports statement at the top of the form:

Imports System.Drawing.Text

   And this code in the Label’s Paint event:

Private Sub Label1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Label1.Paint
        Dim strText As String = "Top to Bottom"
        Dim lbl1gfx As Graphics = e.Graphics
        Dim fnt As Font = New Font("Verdana", 12, FontStyle.Regular)
        Dim SF As New StringFormat
        SF.FormatFlags = StringFormatFlags.DirectionVertical
        lbl1gfx.Clear(Color.White)
        lbl1gfx.TextRenderingHint = _
          TextRenderingHint.AntiAlias
        lbl1gfx.DrawString(strText, fnt, Brushes.Black, 12, 12, SF)
    End Sub

Run the Project and your string will be displayed vertically.

If you want a step by step breakdown of this code, check out the next page.