Set The Printer Font

Preparations

Add 1 Command Button to your form.

Form Code

Private Sub Command1_Click()
    Printer.FontName = "Arial"
    Printer.FontUnderline = False
    Printer.FontBold = False
    Printer.FontItalic = True
    Printer.FontSize = "30"
    Printer.Print "hello"
' use the EndDoc command if this text is the last thing you want
' to print on the paper
 
    Printer.EndDoc
End Sub

Go Back