Microsoft Office Access 2007-Programmierung - Das Handbuch

BEISPIEL

BEISPIEL

Kapitel 4: Berichte

In der Ereignisprozedur

Detailbereich_Print

wird die Farbe des Rechteck-Hintergrundes nach jeder ausge-

druckten Zeile geändert:

Dim frb As Boolean

Private Sub Detailbereich_Print(Cancel As Integer, PrintCount As Integer)

If frb Then

Rechteck.BackColor = vbYellow

Else

Rechteck.BackColor = vbWhite

End If

frb = Not frb

End Sub

Tastatur- und Mausereignisse

Mit Access 2007 hat das Report-Objekt zahlreiche neue Ereignisse bekommen, die allerdings meistens nur

für die Berichtsansicht (manchmal auch Layoutansicht) zutreffen.

Ereignisroutine (Event-Handler) Ereigniseigenschaft (deutsch)

KeyDown(KeyCode As Integer, Shift As Integer) Bei Taste Ab

KeyPress(KeyAscii As Integer) Bei Taste

KeyUp(KeyCode As Integer, Shift As Integer) Bei Taste Auf

MouseDown Bei Maustaste Ab

Click Beim Klicken

DblClick Beim Doppelklicken

MouseMove Bei Mausbewegung

MouseUp Bei Maustaste Auf

MouseWheel Bei Mausrad

Tabelle 4.15 Tastatur- und Mausereignisse beim Report

Um das

Click-

Ereignis zu demonstrieren, lassen wir uns mit Assistentenhilfe einen Bericht für die

Artikel

-

Tabelle der

Nordwind

-Datenbank generieren und fügen in den Detailbereich ganz rechts eine Befehlsschalt-

fläche

Befehl1

ein (damit diese Schaltfläche nicht mit ausgedruckt wird, setzen wir deren

Anzeigen

-Eigenschaft

auf »Nur am Bildschirm«). Der

Click

-Eventhandler unterscheidet sich nicht von dem eines Formulars:

Private Sub Befehl1_Click()

DoCmd.OpenForm "Artikeldetails", acNormal, , "Artikelnr=" & [ArtikelNr], , acDialog

End Sub

Nach Öffnen des Berichts genügt ein Klick auf eine bestimmte Schaltfläche, um das Dialogfenster

Artikel-

details

zu öffnen.

204