设置文字生成标志

From AutoCAD ActiveX/VBA

previous page next page

设置倾斜角度

使用文字样式

使用单行文字

ActiveX/VBA 开发人员手册 > 创建和编辑 AutoCAD 图元 > 将文字添加到图形 > 使用文字样式 >

设置文字生成标志

文字生成标志指定文字是否要反向或倒置显示。要设置文字生成标志，请使用 TextGenerationFlag 特性。要使文字反向显示，请为此特性输入 acTextFlagBackward。要使文字倒置显示，请为此特性输入 acTextFlagUpsideDown。要反向和倒置显示文字，请将两个常量相加，方法是为该特性输入 acTextFlagBackward+acTextFlagUpsidedown。

反向显示文字

本例创建一个文字行，然后使用 TextGenerationFlag 特性将其设置为反向显示。

Sub Ch4_ChangingTextGenerationFlag()

    Dim textObj As AcadText

    Dim textString As String

    Dim insertionPoint(0 To 2) As Double

    Dim height As Double

          ' 创建 Text 对象
          textString = "Hello, World."
          insertionPoint(0) = 3
          insertionPoint(1) = 3
          insertionPoint(2) = 0
          height = 0.5
          Set textObj = ThisDrawing.ModelSpace. _
                      AddText(textString, insertionPoint, height)
                ' 修改 TextGenerationFlag 的值
          textObj.TextGenerationFlag = acTextFlagBackward
          textObj.Update
      End Sub

previous page start next page