イミディエイトウィンドウの高速でダーティなForループ

コードの開発、トラブルシューティング、またはデバッグ中に一連の項目をループしたい場合がありますが、実際の関数またはサブルーチンを作成する価値はありません。そのような状況では、ステートメントの終わりのコロン文字（:）を使用するのが好きです。 ）複数のステートメントを実行する– Forループ全体を含む–イミディエイトウィンドウの1行に 。

次に例を示します：

For i = 0 To CurrentDB.TableDefs.Count - 1: ?i, CurrentDB.TableDefs(i).Name: Next i

上記の1行のコードは、次の従来のコードと同等です。

For i = 0 To CurrentDB.TableDefs.Count - 1
    Debug.Print i & vbTab & CurrentDB.TableDefs(i).Name
Next i

この記事の冒頭にあるコードサンプルは、従来のコードモジュールで使用できる完全に有効な構文ですが、ひどく読めない*ため、「迅速で汚い」開発用途にのみ使用する必要があります。アプリケーションを終了するとすぐに（またはイミディエイトウィンドウバッファをオーバーロードすると）永久に消えることが保証されているイミディエイトウィンドウで。