June 2010
Intermediate to advanced
900 pages
23h 11m
German
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 ...Read now
Unlock full access