Manchmal möchte ich eine Reihe von Elementen durchlaufen, während ich Code entwickle, Fehler behebe oder debugge, und es lohnt sich nicht, eine eigentliche Function- oder Sub-Routine zu erstellen. In solchen Situationen verwende ich gerne den Doppelpunkt am Ende der Anweisung (:
), um mehrere Anweisungen auszuführen– einschließlich ganzer For-Schleifen–in einer einzigen Zeile des Direktfensters .
Hier ist ein Beispiel:
For i = 0 To CurrentDB.TableDefs.Count - 1: ?i, CurrentDB.TableDefs(i).Name: Next i
Die einzelne Codezeile oben entspricht dem folgenden herkömmlichen Code:
For i = 0 To CurrentDB.TableDefs.Count - 1
Debug.Print i & vbTab & CurrentDB.TableDefs(i).Name
Next i
Ich fühle mich verpflichtet zu erwähnen, dass das Codebeispiel oben in diesem Artikel zwar eine absolut gültige Syntax ist, die Sie in einem herkömmlichen Codemodul verwenden könnten, aber schrecklich unlesbar* ist und nur für "schnelle und schmutzige" Entwicklungszwecke verwendet werden sollte im Direktfenster, wo es garantiert für immer verschwunden ist, sobald Sie die Anwendung beenden (oder den Direktfensterpuffer überladen).