CompuServe Archive

This is an archive of CompuServe forum messages from 1985 to 1995, as saved in transcripts by John Foust.

Forum: User CIS ID:

From Date: To Date:

Search Results (3 messages)

#3003– #Printer Positioning Message #3053

From: Bryon Scott MS BASIC Forum · Visual Basic October 14, 1991 6:04 PM

I found a solution. Instead of using Printer.Width & Printer.Height, use the Printer.ScaleWidth and Printer.ScaleHeight properties. This returns the printable height and width. Bryon Scott There are 2 Replies.

#Wish list Message #2863

From: Bryon Scott MS BASIC Forum · Visual Basic October 13, 1991 1:56 PM

Wish list items: Printer.NewPage event – Occurs just prior to a formfeed Printer.EndDoc event – occurs when the printer doc is closed Bryon Scott There is 1 Reply.

#Printer Positioning Message #2861

From: Bryon Scott MS BASIC Forum · Visual Basic October 13, 1991 1:54 PM

O.K people, here's the routine: Sub PrintHeader (Header As String) Dim PageNo As String Printer.CurrentX = 0 Printer.Print Date$; Printer.CurrentX = (Printer.Width – Printer.TextWidth(Header)) Printer.CurrentX = Printer.CurrentX / 2 Printer.Print Header; PageNo = "Page: " + Format$(Printer.Page, "###") Printer.CurrentX = Printer.Width – Printer.TextWidth(PageNo) Printer.Print PageNo Printer.Print " " End Sub…