उदाहरणों के साथ VB.Net में केस स्टेटमेंट का चयन करें
VB.Net में सेलेक्ट केस क्या है?
मामले का चयन करें एक सशर्त कथन है, जो आपको मानों के एक सेट के विरुद्ध समानता के लिए एक चर का परीक्षण करने में मदद करता है। प्रत्येक मान को एक केस के रूप में संदर्भित किया जाता है, और जिस चर को चालू किया जा रहा है, उसे सभी चयनित मामलों के लिए जाँचा जाना चाहिए।
Select Case कथन आपको किसी चर की सामग्री के परीक्षण का एक आसान तरीका प्रदान करता है। हालाँकि, यह केवल तभी उपयोग के लिए उपयुक्त है जब किसी चर में सीमित संख्या में विकल्प हों।
VB.Net में सेलेक्ट केस स्टेटमेंट का सिंटैक्स
Select Case कथन को VB.Net में निम्नलिखित सिंटैक्स का उपयोग करके घोषित किया जाता है:
Select [ Case ] your_expression [ Case expression_list [ statement(s) ] ] [ Case Else [ else statement(s) ] ] End Select
आइये वाक्यविन्यास में प्रयुक्त पैरामीटर्स का वर्णन करें:
- आपकी_अभिव्यक्ति: यह एक अभिव्यक्ति को दर्शाता है जो प्राथमिक में से एक का मूल्यांकन करता है जानकारी का प्रकार में समर्थित Microsoft वीबी.नेट.
- अभिव्यक्ति_सूची: अभिव्यक्ति खंड जो अभिव्यक्ति के लिए मिलान मानों को दर्शाते हैं। कई खंडों के मामले में, उन्हें अल्पविराम (,) का उपयोग करके अलग करें।
- कथन: वे कथन जो केस के बाद आते हैं और वे तब निष्पादित होते हैं जब चयन अभिव्यक्ति, expression_list में किसी भी खंड से मेल खाती है।
- अन्य कथन: वे कथन जो Case Else का अनुसरण करते हैं और तब चलते हैं जब चयन अभिव्यक्ति किसी भी Case कथन के लिए expression_list में किसी भी खंड से मेल खाने में विफल हो जाती है।
VB.Net चयन केस स्टेटमेंट प्रोग्राम उदाहरण
आइए एक उदाहरण का उपयोग करके देखें कि VB.Net में Select Case Statement का उपयोग कैसे किया जाता है:
चरण 1) सबसे पहले, एक नया कंसोल एप्लिकेशन बनाएं।
चरण 2) निम्नलिखित कोड का प्रयोग करें:
Module Module1 Sub Main() Dim name As String name = "Guru99" Select Case name Case "John" Console.WriteLine("Hello John") Case "Guru99" Console.WriteLine("Hello Guru99") Case "Alice" Console.WriteLine("Hello Alice") Case "Joel" Console.WriteLine("Hello Joel") Case Else Console.WriteLine("unknown name") End Select Console.WriteLine("VB.NET is easy!") Console.ReadKey() End Sub End Module
चरण 3) प्रोग्राम को निष्पादित करने के लिए शीर्ष बार से स्टार्ट बटन पर क्लिक करें। यह आपको निम्नलिखित परिणाम देगा:
यहां हमारे द्वारा उपयोग किये गए कोड का स्क्रीनशॉट है:
कोड की व्याख्या:
- Module1 नामक एक मॉड्यूल बनाना.
- मुख्य उप-प्रक्रिया का प्रारंभ.
- नाम नामक एक स्ट्रिंग वेरिएबल बनाना.
- चर नाम को गुरु99 का मान निर्दिष्ट करना।
- किसी चर नाम के मान का उपयोग मिलान खोजने के लिए विभिन्न केस कथनों के साथ तुलना करने के लिए किया जाएगा।
- यदि किसी चर नाम का मान जॉन है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि किसी चर नाम का मान Guru99.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि किसी चर नाम का मान ऐलिस है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि किसी चर नाम का मान Joel.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि उपरोक्त में से कोई भी केस कथन सत्य नहीं है/ मेल नहीं खाता है।
- यदि उपरोक्त केस सत्य है, अर्थात कोई भी केस कथन मेल नहीं खाता है, तो कंसोल पर प्रिंट करने के लिए पाठ।
- चयन कथन का अंत.
- यह कथन स्क्रीन पर कुछ टेक्स्ट प्रिंट करेगा, भले ही केस कथन मेल खाता हो या नहीं। यह हमेशा निष्पादित होगा।
- कंसोल विंडो को कुछ समय के लिए रोकें और उपयोगकर्ता द्वारा इसे बंद करने के लिए कार्रवाई किए जाने की प्रतीक्षा करें।
- मुख्य उप-प्रक्रिया का अंत.
- मॉड्यूल का अंत.
उदाहरण 2
आप उपयोगकर्ता को नाम टाइप करने की अनुमति भी दे सकते हैं और उसके आधार पर अपना निर्णय ले सकते हैं।
चरण 1) एक नया कंसोल अनुप्रयोग बनाएँ.
चरण 2) निम्नलिखित कोड का प्रयोग करें:
Module Module1 Sub Main() Console.Write("Enter your name: ") Dim name As String = Console.ReadLine() Select Case name Case "John" Console.WriteLine("Hello John") Case "Guru99" Console.WriteLine("Hello Guru99") Case "Alice" Console.WriteLine("Hello Alice") Case "Joel" Console.WriteLine("Hello Joel") Case Else Console.WriteLine("unknown name") End Select Console.WriteLine("VB.NET is easy!") Console.ReadKey() End Sub End Module
चरण 3) इसे निष्पादित करने के लिए शीर्ष बार से प्रारंभ बटन पर क्लिक करें। इसे निम्नलिखित परिणाम लौटाना चाहिए:
चरण 4) Guru99 नाम टाइप करें और एंटर कुंजी दबाएँ। आपको निम्नलिखित संदेश प्राप्त होने चाहिए:
कोड का स्क्रीनशॉट यहां दिया गया है:
कोड की व्याख्या:
- Module1 नामक एक मॉड्यूल बनाना.
- मुख्य उप-प्रक्रिया का प्रारंभ.
- कंसोल पर कुछ पाठ मुद्रित करना जिसमें उपयोगकर्ता को अपना नाम दर्ज करने का निर्देश दिया जाता है।
- नाम नामक एक स्ट्रिंग वेरिएबल बनाना और उपयोगकर्ता को कंसोल पर इस वेरिएबल के लिए एक मान दर्ज करने के लिए संकेत देना।
- चर नाम का मान मिलान खोजने के लिए विभिन्न केस कथनों के साथ तुलना करने के लिए उपयोग किया जाएगा।
- यदि चर नाम का मान जॉन है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि चर नाम का मान Guru99 है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि चर नाम का मान ऐलिस है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि चर नाम का मान Joel है.
- यदि उपरोक्त मामला सत्य/मेल खाता है तो कंसोल पर प्रिंट करने के लिए पाठ।
- यदि उपरोक्त में से कोई भी केस कथन सत्य नहीं है/ मेल नहीं खाता है।
- यदि उपरोक्त केस सत्य है, अर्थात कोई भी केस कथन मेल नहीं खाता है, तो कंसोल पर प्रिंट करने के लिए पाठ।
- चयन कथन का अंत.
- यह कथन स्क्रीन पर कुछ टेक्स्ट प्रिंट करेगा, भले ही केस कथन मेल खाता हो या नहीं। यह हमेशा निष्पादित होगा।
- कंसोल विंडो को कुछ समय के लिए रोकें और उपयोगकर्ता द्वारा इसे बंद करने के लिए कार्रवाई किए जाने की प्रतीक्षा करें।
- मुख्य उप-प्रक्रिया का अंत.
- मॉड्यूल का अंत.
VB.Net में ToLower() और ToUpper() फ़ंक्शन
Select Case कथन केस सेंसिटिव है। इसका मतलब है कि यह guru99 को Guru99 से अलग मानेगा। हालाँकि, हम इस कथन के साथ केस के मुद्दे को संभालने के लिए ToLower() और ToUpper() फ़ंक्शन का उपयोग कर सकते हैं।
VB.Net में ToLower() और ToUpper() का उदाहरण
यहाँ VB.Net में ToLower() और ToUpper() फ़ंक्शन का एक उदाहरण दिया गया है:
चरण 1) एक नया कंसोल अनुप्रयोग बनाएँ.
चरण 2) निम्नलिखित कोड का प्रयोग करें:
Module Module1 Sub Main() Console.Write("Enter your name: ") Dim name As String = Console.ReadLine() Select Case name.ToLower() Case "john." Console.WriteLine("Hello John") Case "guru99." Console.WriteLine("Hello Guru99") Case "alice." Console.WriteLine("Hello Alice") Case "joel." Console.WriteLine("Hello Joel") Case Else Console.WriteLine("unknown name") End Select Console.WriteLine("VB.NET is easy!") Console.ReadKey() End Sub End Module
चरण 3) कोड चलाने के लिए शीर्ष बार पर स्टार्ट बटन पर क्लिक करें। आपको निम्न आउटपुट मिलना चाहिए:
चरण 4) गुरु99 नाम टाइप करें (G अपरकेस है) और अपने कीबोर्ड पर एंटर कुंजी दबाएँ। आपको निम्नलिखित संदेश मिलना चाहिए:
कोड का स्क्रीनशॉट यहां दिया गया है:
कोड की व्याख्या:
कोड पंक्ति 5: वैरिएबल नाम का मान विभिन्न केस स्टेटमेंट के साथ तुलना करने के लिए इस्तेमाल किया जाएगा ताकि मिलान पाया जा सके। ToLower() फ़ंक्शन यह सुनिश्चित करेगा कि उपयोगकर्ता द्वारा टाइप किया गया कोई भी नाम केस स्टेटमेंट के मूल्यांकन से पहले लोअरकेस में परिवर्तित हो जाए। इसका मतलब यह है कि अगर उपयोगकर्ता Guru99 टाइप करता है, तो इसे तुरंत guru99 में बदल दिया जाएगा, फिर केस स्टेटमेंट का मूल्यांकन किया जाएगा। अगर उपयोगकर्ता John टाइप करता है, तो इसे तुरंत john में बदल दिया जाएगा, इससे पहले कि केस स्टेटमेंट का मूल्यांकन किया जाए।
शेष कोड ऊपर के समान है।
सारांश
- VB.NET द्वारा प्रदान किया गया Select Case कथन, मिलान के माध्यम से मानों के एक समूह के विरुद्ध मान का मूल्यांकन करने में आपकी सहायता करता है।
- यह तभी उपयुक्त है जब प्रश्नगत चर के संभावित मान सीमित हों।
- Select Case कथन केस संवेदनशील है।
- आप स्ट्रिंग्स को क्रमशः लोअरकेस और अपरकेस में बदलने के लिए ToLower() और ToUpper() फ़ंक्शन का उपयोग कर सकते हैं।