ActiveX and VBA Developer's Guide > Create and Edit AutoCAD Entities > Add Text to Drawings > Work with Text Styles > 
Set Text Generation Flag
 
 
 

The text generation flag specifies if the text is displayed backward or upside-down. To set the text generation flag, use the TextGenerationFlag property. To display the text backward, enter acTextFlagBackward for this property. To display the text upside-down, enter acTextFlagUpsideDown for this property. To display the text both backward and upside-down, add the two constants together by entering acTextFlagBackward+acTextFlagUpsidedown for this property.

Display text backward

This example creates a line of text, then sets it to be displayed backward using the TextGenerationFlag property.

Sub Ch4_ChangingTextGenerationFlag()

	Dim textObj As AcadText

	Dim textString As String

	Dim insertionPoint(0 To 2) As Double

	Dim height As Double




	' Create the text object




	textString = "Hello, World."




	insertionPoint(0) = 3




	insertionPoint(1) = 3




	insertionPoint(2) = 0




	height = 0.5




	Set textObj = ThisDrawing.ModelSpace. _




				AddText(textString, insertionPoint, height)







	' Change the value of the TextGenerationFlag




	textObj.TextGenerationFlag = acTextFlagBackward




	textObj.Update




End Sub