Access
 sql >> Datenbank >  >> RDS >> Access

Quick and Dirty For-Schleifen im Direktfenster

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).