PrintOptions.PrintText

Property PrintText As Boolean

Member of PrintOptions

The PrintText property returns or sets whether text is printed.

The following code example creates a text string and adds a uniform fill to it. The text is then set to print in black, and the document is printed.

Sub Test() 
 Dim s As Shape 
 Set s = ActiveLayer.CreateArtisticText(4, 5, "Some Text String") 
 s.Fill.UniformColor.RGBAssign 255, 0, 0 
 With ActiveDocument.PrintSettings.Options 
  .PrintText = True 
  .TextInBlack = True 
 End With 
 ActiveDocument.PrintOut 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.