Вывожу на печать текст из RichTextBox, а печатаются иероглифы (хотя в самом поле все нормально отображается). И еще текст, написаный жирным шрифтом, на бумаге вовсе не жирный
Private Sub cmdPrint_Click()
Printer.Orientation = vbPRORLandscape
Printer.FontName = "Arial"
Printer.FontSize = FontSizer.Text 'FontSizer - это у меня ComboBox
Printer.Print txtPredchek1.Text
Printer.EndDoc
End Sub