API Documentation > CorelDRAW > 2025-v26 > PrintOptions > IPrnVBAPrintOptions
PrintOptions.TextInBlack property
Specifies whether text should be printed in black
Syntax:
Property Get TextInBlack() As Boolean
Property Let TextInBlack(ByVal Value As Boolean)
Remarks:
The TextInBlack property returns or specifies a Boolean (True or False) value that indicates whether to print all text print in black.
Examples:
The following VBA example creates a text string and adds a uniform fill to it. The text is then specified as 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