तत्काल विंडो में लूप्स के लिए त्वरित और गंदा

कभी-कभी जब मैं कुछ कोड विकसित कर रहा हूं, समस्या निवारण कर रहा हूं या डीबग कर रहा हूं, तो मैं वस्तुओं के एक सेट के माध्यम से लूप करना चाहता हूं और यह वास्तविक फ़ंक्शन या सब रूटीन बनाने के लायक नहीं है। उन स्थितियों में, मैं एंड-ऑफ-स्टेटमेंट कोलन कैरेक्टर (: . का उपयोग करना पसंद करता हूं ) एकाधिक कथन निष्पादित करने के लिए– संपूर्ण फॉर लूप सहित–तत्काल विंडो की एक पंक्ति में ।

यहां एक उदाहरण दिया गया है:

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

उपरोक्त कोड की एक पंक्ति निम्नलिखित पारंपरिक कोड के बराबर है:

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

मैं यह उल्लेख करने के लिए बाध्य महसूस करता हूं कि इस आलेख के शीर्ष से कोड नमूना पूरी तरह से मान्य वाक्यविन्यास है जिसे आप पारंपरिक कोड मॉड्यूल में उपयोग कर सकते हैं, यह बेहद अपठनीय है * और इसका उपयोग केवल "त्वरित और गंदे" विकास उपयोग के लिए किया जाना चाहिए तत्काल विंडो में जहां यह गारंटी है कि जैसे ही आप एप्लिकेशन से बाहर निकलते हैं (या तत्काल विंडो बफर को अधिभारित करते हैं)।