I want to print styled text and I found the example code below, but it opens two printer dialogs. Is there a better way to do this?
Dim g As Graphics
Dim p As PrinterSetup
p = New PrinterSetup
If p.PageSetupDialog Then
g = OpenPrinterDialog§
If g <> Nil Then
g.DrawString(“Hello World”, 50, 50)
End If
End If