Cepat dan Kotor Untuk Loop di Jendela Segera

Terkadang saya ingin mengulang satu set item saat saya mengembangkan, memecahkan masalah, atau men-debug beberapa kode dan itu tidak layak untuk membuat Fungsi atau Sub rutin yang sebenarnya. Dalam situasi itu, saya suka menggunakan karakter titik dua akhir pernyataan (: ) untuk mengeksekusi beberapa pernyataan– termasuk seluruh loop For–dalam satu baris dari Jendela Segera .

Ini contohnya:

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

Satu baris kode di atas setara dengan kode tradisional berikut:

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

Saya merasa berkewajiban untuk menyebutkan bahwa meskipun contoh kode dari bagian atas artikel ini adalah sintaks yang benar-benar valid yang dapat Anda gunakan dalam modul kode tradisional, itu sangat tidak dapat dibaca* dan hanya boleh digunakan untuk penggunaan pengembangan "cepat dan kotor" di Jendela Segera yang dijamin akan hilang selamanya segera setelah Anda keluar dari aplikasi (atau membebani buffer Jendela Segera).