Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Drucken
Autor: Arti
Datum: 12.08.05 14:30
Ich habe ein Formular in Visual Basic 5.0 mit viel Grafik übersäht erstellt und versuche es nun auf Din A4 eingepaßt im Querformat zu drucken. Geht einfach nicht ....... Hier den Code den ich versucht habe. Sub Command1_Click() Dim BeginPage, EndPage, NumCopies, I CommonDialog1.CancelError = True On Error GoTo ErrHandler CommonDialog1.PrinterDefault = True With CommonDialog1 .Flags = &H40 End With CommonDialog1.ShowPrinter BeginPage = CommonDialog1.FromPage EndPage = CommonDialog1.ToPage NumCopies = CommonDialog1.Copies Printer.Orientation = vbPRORLandscape For I = 1 To NumCopies Printer.Print Form1 Next I Exit Sub ErrHandler: Exit Sub End Sub Alle Versuche den Ausdruck vom Form1 im Querformat zu erhalten sind gescheitert. Was mache ich falsch??? Jetzt schon, vielen Dank für Euere Hilfe Arti

Drucken	539	Arti	12.08.05 14:30
Re: Drucken	541	wincnc	12.08.05 15:38
Re: Drucken	330	Arti	12.08.05 16:26

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen