Procedimiento para crear texto vertical

Puede usar un objeto StringFormat para especificar que el texto debe dibujarse verticalmente en lugar de horizontalmente.

Ejemplo

En el ejemplo siguiente se asigna el valor DirectionVertical a la propiedad FormatFlags de un objeto StringFormat. Ese objeto StringFormat se pasa al método DrawString de la clase Graphics. El valor DirectionVertical es un miembro de la enumeración StringFormatFlags.

En la ilustración siguiente se muestra el texto vertical:

Gráfico que muestra texto de fuente vertical.

string myText = "Vertical text";

FontFamily fontFamily = new FontFamily("Lucida Console");
Font font = new Font(
fontFamily,
   14,
   FontStyle.Regular,
   GraphicsUnit.Point);
PointF pointF = new PointF(40, 10);
StringFormat stringFormat = new StringFormat();
SolidBrush solidBrush = new SolidBrush(Color.FromArgb(255, 0, 0, 255));

stringFormat.FormatFlags = StringFormatFlags.DirectionVertical;

e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat);

Dim myText As String = "Vertical text"

Dim fontFamily As New FontFamily("Lucida Console")
Dim font As New Font( _
   fontFamily, _
   14, _
   FontStyle.Regular, _
   GraphicsUnit.Point)
Dim pointF As New PointF(40, 10)
Dim stringFormat As New StringFormat()
Dim solidBrush As New SolidBrush(Color.FromArgb(255, 0, 0, 255))

stringFormat.FormatFlags = StringFormatFlags.DirectionVertical

e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat)

Compilar el código

Consulte también