O'Reilly logo

Microsoft Access 2010 - Das Handbuch by Lorenz Hölscher

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

Die Select-Anweisung

Sobald Sie mehrfach ElseIf im Code einsetzen, gibt es eine viel übersichtlichere Anweisung zum Programmieren: Select Case. Letzten Endes programmieren Sie damit das gleiche Ergebnis, aber es ist viel kürzer geschrieben.

Hinter der Select Case-Anweisung steht der Wert, den es zu untersuchen gilt. Danach folgt nur noch der Vergleich hinter der Case-Anweisung. Schon die erste Version des bisherigen Codes ist etwas übersichtlicher:

Sub GroessereAuswahlBesser()
    Dim intAuswahl As Integer

    intAuswahl = MsgBox("Wie geht's weiter?", vbAbortRetryIgnore)

    Select Case intAuswahl
    Case vbAbort
        End     'also alles stoppen!
    Case vbRetry
         MsgBox "Nochmal versuchen..."
    Case vbIgnore
         'alles ignorieren und nix tun Case Else MsgBox "Bitte sagen Sie dem ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required