Warum noch ein Access-Buch?
Für wen ist das Buch?
Jetzt bestellen
+ direkter Download des eBooks!
Nur EUR 59,95!
Fehler gefunden?
Bitte melden!
Wünsche an das Buch?
Her damit!
Was denken die Leser über dieses Buch?
Lesen Sie aktuelle Rezensionen!
Kapitel des noch nicht veröffentlichten Buchs zum Downloaden, Probelesen und Kommentieren
Beispieldatenbanken
Zusätzliches Material

Das Buch im HTML-Format

Für unbestimmte Zeit bieten Addison-Wesley und André Minhorst den kompletten Inhalt des Buchs als Download an. Schauen Sie rein und informieren Sie sich über den Inhalt! Und wenn Ihnen das Buch nützlich erscheint und Sie glauben, dass Sie etwas gelernt haben oder durch das Gelesene sogar etwas Zeit und somit Geld bei Ihrer Arbeit einsparen konnten, können Sie sich ja beim Autor und beim Verlag revanchieren - beispielsweise durch den Kauf dieses Buchs.

Am schönsten wäre es natürlich, wenn Sie das Buch direkt hier bestellen - Sie erhalten das Buch dann direkt vom Verlag, und der Autor und Verlag haben dann noch mehr davon, als wenn Sie es anderswo kaufen.

Danke für Ihr Interesse!

15.4.5 Property Get: Lesen von skalaren Variablen und Objektvariablen

15.4.6 Vertrauen ist gut, Kontrolle ist besser

Weiter oben war vom »kontrollierten Zugriff« auf Eigenschaften die Rede. Nachdem Sie nun wissen, wie Sie den schreibenden und lesenden Zugriff auf die Eigenschaften einer Klasse realisieren, müssen Sie nur noch entsprechende Kontrollfunktionen einbauen. Die Property Let-/Set-/Get-Prozeduren sind nämlich nicht auf die Anweisung zum Weiterleiten des Übergabewertes beschränkt, sondern können noch weitere Anweisungen aufnehmen. So könnten Sie beispielsweise das Setzen des Kontostandes in Abhängigkeit vom Dispositionsrahmen kontrollieren:

Public Property Let Kontostand(curKontostand As Currency)
    If curKontostand < mDispositionsrahmen Then
        MsgBox "Der gewünschte Kontostand konnte nicht eingestellt werden."
    Else
        mKontostand = curKontostand
    End If
End Property

Listing 15.16: Prüfen einer Eingabe in einer Property Let-Prozedur

Wenn Sie wie mit der folgenden Prozedur den Kontostand auf einen Wert einstellen möchten, der unter dem Dispositionsrahmen liegt, erscheint eine entsprechende Meldung.

Public Sub KontostandEinstellen()

    Dim objKonto As clsKonto

    Set objKonto = New clsKonto

    objKonto.Dispositionsrahmen = 0
    objKonto.Kontostand = -100

    Set objKonto = Nothing

End Sub

Listing 15.17: Einstellen eines ungültigen Kontostands

Auf die gleiche Weise lässt sich beispielsweise protokollieren, wann bestimmte Daten abgerufen oder geändert wurden.

Nächster Abschnitt:

15.5 Methoden einer Klasse

© 2006-2008 André Minhorst Alle Rechte vorbehalten.