Cómo: Crear texto vertical
Se puede utilizar un objeto StringFormat para especificar que el texto se dibuje en vertical y no en horizontal.
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 siguiente ilustración se muestra el texto vertical.
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)
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);
Compilar el código
- El ejemplo anterior está diseñado para formularios Windows Forms y requiere PaintEventArgs e , que es un parámetro de PaintEventHandler.