print6

 

Set The Printer Font


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