Nhanh chóng và bẩn đối với các vòng lặp trong cửa sổ ngay lập tức

Đôi khi tôi muốn lặp lại một tập hợp các mục trong khi đang phát triển, khắc phục sự cố hoặc gỡ lỗi một số mã và việc tạo một quy trình Chức năng hoặc Phụ thực tế là không đáng. Trong những tình huống đó, tôi muốn sử dụng ký tự dấu hai chấm ở cuối câu lệnh (: ) để thực thi nhiều câu lệnh– bao gồm toàn bộ vòng lặp Đối với –trong một dòng duy nhất của Cửa sổ ngay lập tức .

Đây là một ví dụ:

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

Một dòng mã ở trên tương đương với mã truyền thống sau:

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

Tôi cảm thấy có trách nhiệm phải đề cập rằng mặc dù mẫu mã từ đầu bài viết này là cú pháp hoàn toàn hợp lệ mà bạn có thể sử dụng trong mô-đun mã truyền thống, nhưng nó rất khó đọc * và chỉ nên được sử dụng cho mục đích phát triển "nhanh chóng và bẩn thỉu" trong Cửa sổ ngay lập tức, nơi nó được đảm bảo sẽ biến mất vĩnh viễn ngay khi bạn thoát ứng dụng (hoặc làm quá tải bộ đệm Cửa sổ ngay lập tức).