Microsoft Office Access 2007-Programmierung - Das Handbuch

BEISPIEL

BEISPIEL

BEISPIEL

Kapitel 16: Techniken der Programmentwicklung

Verwendung des Debug-Objekts

Debug.Print

Über die Print-Methode des Debug-Objekts lassen sich Programmausgaben in das Direktfenster umleiten.

Diese Vorgehensweise ist für die Ausgabe von Zwischenergebnissen zwecks Fehlersuche sehr interessant

1

.

Das folgende Code-Fragment gibt bei jedem Schleifendurchlauf den Inhalt des Arrays

Tabellen

im Direkt-

fenster aus:

For Each n In Liste2.ItemsSelected

Tabellen(i) = Liste2.ItemData(n)

Debug.Print Tabellen(i)

i = i + 1

Next n

Innerhalb einer Print-Anweisung können auch mehrere Ausgaben pro Zeile vorgenommen werden, die

dann durch Semikola bzw. Tab() oder Spc() voneinander zu trennen sind.

Wenn Sie diese Codezeile in irgendein Modul einfügen:

Debug.Print i; Tab(7); Text3.Value

können Sie im Direktfenster den momentanen Wert der Variablen

i

und den Inhalt des Editierfeldes

Text3

begutachten.

Debug.Assert

Neben Print findet sich noch eine weitere wichtige Methode beim Debug-Objekt – die Rede ist von Assert.

Diese Methode ermöglicht es dem Programmierer die Programmausführung zu stoppen, wenn eine vorge-

gebene Bedingung nicht mehr eingehalten wird.

Nützlich ist diese Methode, um zum Beispiel die aktuellen Zustände von anderen Variablen per Debugger

zu untersuchen.

Wir unterbrechen die Programmausfühung, wenn die Variable

n

den Wert

100

besitzt

Sub test()

Dim i As Integer

Dim n As Long

For i = 1 To 10000

n = Round(1000 * Rnd)

Debug.Assert n <> 100

Debug.Print n

Next

End Sub

1

Zur Erinnerung: ein Formular hat keine Print-Methode!

1024