VB6 में Dir $ का उपयोग कैसे करें

विज़ुअल बेसिक प्रोग्रामिंग भाषा का अभी भी आधुनिक प्रोग्रामिंग और अनुप्रयोग विकास में कुछ उपयोग है, और जैसे कि आप अपनी कंपनी के पेशेवर अनुप्रयोगों को पुराने ऐप या कोड लाइब्रेरी के साथ काम करने के लिए खुद को इसके सिंटैक्स में शामिल कर सकते हैं। डिर $ फंक्शन का उपयोग करके आप आसानी से देख सकते हैं कि VB6 के माध्यम से फाइल और फोल्डर की खोज कैसे की जाती है।

1।

फ़ाइल मौजूद है या नहीं यह जाँचने के लिए Dir $ फंक्शन का उपयोग करें। यदि फ़ाइल मौजूद नहीं है, तो फ़ंक्शन एक रिक्त स्ट्रिंग लौटाता है। निम्न कोड यह निर्धारित करता है कि फ़ाइल "example.txt" C में मौजूद है या नहीं: निर्देशिका:

यदि डार $ ("C: \ example.txt") = "" तब Msgbox "यहाँ नहीं!" यहाँ पर Msgbox "इफ इफ़"

2।

यदि निर्देशिका मौजूद है, तो यह जांचने के लिए Dir $ का प्रयोग करें। यह कमांड उस के समान है जो चेक करता है कि कोई फ़ाइल मौजूद है, लेकिन फ़ंक्शन कॉल में "vbDirectory, " अतिरिक्त तर्क के उपयोग की आवश्यकता है। यह उदाहरण कोड C: पार्टीशन में "उदाहरण" नामक फ़ोल्डर के अस्तित्व की जाँच करता है:

यदि Dir $ ("C: \ example", vbDirectory) = "" तब Msgbox "यहाँ नहीं है!" यहाँ पर Msgbox "इफ इफ़"

3।

निर्देशिका की सामग्री को सूचीबद्ध करने के लिए Dir $ का प्रयोग करें। यदि आप जानते हैं कि एक निर्देशिका मौजूद है, तो आप उस निर्देशिका में फ़ाइलों को सूचीबद्ध करने के लिए Dir $ का उपयोग कर सकते हैं। "नाम" नामक चर का उपयोग करते हुए, डार्ट-लूप के साथ डार $ का उपयोग करें। प्रत्येक फ़ाइल के नाम को उस निर्देशिका में खींचने के लिए, जिसमें एक .txt फ़ाइल एक्सटेंशन हो:

मंद नाम अस स्ट्रिंग

name = Dir $ ("C: \ example * .txt") Do तक नाम = "" प्रिंट नाम का नाम = Dir $ () लूप