如何:创建垂直文本

可使用 StringFormat 对象指定在垂直方向而不是在水平方向绘制文本。

示例

下面的示例将值 DirectionVertical 赋给 StringFormat 对象的 FormatFlags 属性。 该 StringFormat 对象被传递给 Graphics 类的 DrawString 方法。 DirectionVertical 值是 StringFormatFlags 枚举的成员。

下面的插图显示竖排文本。

字体文本

        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); 

编译代码

请参见

任务

如何:用 GDI 绘制文本