'some click event
Printer.Print ,,"Document Name"
Printer.Print ""
Dim i as integer
For i = 1 to 20
Printer.Print i
Next i
Printer.EndDoc
"A myth is not the succession of individual images,
but an integerated meaningful entity,
reflecting a distinct aspect of the real world."
___ Adolf Jensen