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
| |
|
|
|