Ausgabe über Bildschirm oder Drucker

Druck in das Direktfenster

Das Direktfenster kann während der Testphase ständig geöffnet beleiben. Wenn das Arbeitsfenster so liegt, daß das Direktfenster nicht überdeckt wird, können die laufenden Ausgaben beobachtet werden.

Syntax: Debug.Print Ausdruck

Ausgabe in eine Message-Box

Syntax: [Antwortvariable = ] MsgBox(prompt[, buttons] [, title] [, helpfile, context])

prompt ist erforderlich und gibt den Text der Meldung im Dialogfeld an.
buttons kennzeichnet die Anzahl und den Typ der anzuzeigenden Schaltflächen, die Angabe erfolgt entweder duch Angabe des Variablennamens z.B. in der Form vbOKCancel oder durch Angabe des zugehörigen Zahlenwertes. Das Argument buttons hat die folgenden Einstellungen:

Konstante	Wert	Beschreibung
vbOKOnly	0	Nur die Schaltfläche OK anzeigen.
VbOKCancel	1	Schaltflächen OK und Abbrechen anzeigen.
VbAbortRetryIgnore	2	Schaltflächen Abbruch, Wiederholen und Ignorieren anzeigen.
VbYesNoCancel	3	Schaltflächen Ja, Nein und Abbrechen anzeigen.
VbYesNo	4	Schaltflächen Ja und Nein anzeigen.
VbRetryCancel	5	Schaltflächen Wiederholen und Abbrechen anzeigen.
VbCritical	16	Meldung mit Stop-Symbol anzeigen.
VbQuestion	32	Meldung mit Fragezeichen-Symbol anzeigen.
VbExclamation	48	Meldung mit Ausrufezeichen-Symbol anzeigen.
VbInformation	64	Meldung mit Info-Symbol anzeigen.
VbDefaultButton1	0	Erste Schaltfläche ist Standardschaltfläche.
VbDefaultButton2	256	Zweite Schaltfläche ist Standardschaltfläche.
VbDefaultButton3	512	Dritte Schaltfläche ist Standardschaltfläche.
VbDefaultButton4	768	Vierte Schaltfläche ist Standardschaltfläche.
VbApplicationModal	0	An die Anwendung gebunden. Der Benutzer muß auf das Meldungsfeld reagieren, bevor er seine Arbeit mit der aktuellen Anwendung fortsetzen kann.
VbSystemModal	4096	An das System gebunden. Alle Anwendungen werden unterbrochen, bis der Benutzer auf das Meldungsfeld reagiert.

Die erste Gruppe von Werten (0 - 5) beschreibt die Anzahl und den Typ der im Dialogfeld angezeigten Schaltflächen. Die zweite Gruppe (16, 32, 48, 64) beschreibt die Symbolart. Die dritte Gruppe (0, 256, 512) legt die Standardschaltfläche fest. Die vierte Gruppe (0, 4096) legt fest, in welcher Form das Dialogfeld gebunden ist. Verwenden Sie beim Addieren der Zahlen zu einem Gesamtwert für das Argument buttons nur eine Zahl aus jeder Gruppe.

title ist optional und gibt den Text der Titelleiste des Dialogfeldes an.
helpfile und context ermöglichen die Verknüpfung der Box mit Hilfe-Dateien.
Antwortvariable ist optional, sie kann die folgenden Werte annehmen, die anschließend ausgewertet werden können:

Konstante	Wert	Beschreibung
vbOK	1	OK
vbCancel	2	Abbrechen
vbAbort	3	Abbruch
vbRetry	4	Wiederholen
vbIgnore	5	Ignorieren
vbYes	6	Ja
vbNo	7	Nein

Ausgabe mit Hilfe eines Bezeichnungsfeldes

Syntax: UserForm1.Label2.Caption = Ausdruck

Ein Label kann nur eine "Aufschrift" besitzen, deshalb muß immer der ganze anzuzeigende Text zugewiesen werden. Bei Werteausgaben mit Bezeichnung muß man entweder der Bezeichnung, die immer wieder erscheinen soll, ein eigenes Label geben oder alternativ so vorgehen:

vor der Berechnung:
Form1.Label1.Caption = "Gesamtpreis incl. MWSt = "
nach der Berechnung:
Form1.Label.Caption = Form1.Label.Caption & Format$(Preis, "####,## DM")

Ausgabe in ein Textfeld

Syntax: UserForm1.text1.text = Ausdruck

Das Textfeld kann immer nur einen Text enthalten. Deshalb muß der Text genauso aufbereitet werden, wie es oben beim Bezeichnungsfeld gezeigt ist.

Druckerausgabe

Textausgaben können über das Printer-Objekt direkt an den Drucker erfolgen. Zur Druckereinstellung oder zum Start des Druckvorganges einer Grafik oder eines kompletten Dokuments nutzt man am besten einen Standarddialog. (Vgl. Standarddialoge: Drucken). Die Druckbefehle sind Methoden des Printer-Objekts. Über Einzelheiten sehe man in der Hilfe nach. Einfache Textausgaben erfolgen wie auf dem Debug-Fenster.
Code Beispiel:

Printer.Print "Dies ist die erste Zeile"     'Druck mit Zeilenumbruch
Printer.Print                                'ergibt eine Leerzeile
Printer.Print "Dies ist die dritte ";        'Druck ohne Zeilenumbruch
Printer.Print " Zeile"                       'Zeile 3 wird fertig gedruckt
Printer.EndDoc                               'Dokumentenende, sofortiger Druck

Alle Grafikmethoden, die auf einem Formular oder einer PictureBox zum Aufbau einer Grafik ausgeführt werden, können auch auf das Printerobjekt angewandt werden.