Επιλέξτε Case Statement στο VB.Net με Παραδείγματα

Τι είναι το Select Case στο 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

Ας περιγράψουμε τις παραμέτρους που χρησιμοποιούνται στη σύνταξη:

your_expression: αυτό υποδηλώνει μια έκφραση που αποτιμάται σε ένα από τα στοιχειώδη Τύποι δεδομένων υποστηρίζεται σε Microsoft VB.NET.
έκφραση_λίστα: προτάσεις έκφρασης που δηλώνουν τις τιμές αντιστοίχισης για την παράσταση. Για την περίπτωση πολλαπλών προτάσεων, διαχωρίστε τις χρησιμοποιώντας κόμμα (,).
δήλωση: δηλώσεις που ακολουθούν το Case και εκτελούνται αφού η έκφραση Select έχει ταιριάξει με οποιαδήποτε πρόταση στο express_list.
άλλες δηλώσεις: δηλώσεις που ακολουθούν το Case Else και εκτελούνται μόλις η έκφραση select αποτύχει να ταιριάζει με καμία από τις ρήτρες στη express_list για οποιαδήποτε πρόταση Case.

VB.Net Επιλέξτε Παραδείγματα προγράμματος δήλωσης περίπτωσης

Ας χρησιμοποιήσουμε ένα παράδειγμα για να δείξουμε πώς να χρησιμοποιήσετε τη δήλωση επιλογής υπόθεσης στο VB.Net:

Βήμα 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.
Έναρξη της κύριας υποδιαδικασίας.
Δημιουργία μιας μεταβλητής συμβολοσειράς με όνομα.
Εκχώρηση τιμής Guru99 στο όνομα της μεταβλητής.
Η τιμή ενός ονόματος μεταβλητής θα χρησιμοποιηθεί για την εκτέλεση συγκρίσεων με τις διάφορες προτάσεις Case για την εύρεση μιας αντιστοίχισης.
Αν η τιμή ενός ονόματος μεταβλητής είναι John.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν η τιμή ενός ονόματος μεταβλητής είναι Guru99.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν η τιμή ενός ονόματος μεταβλητής είναι Alice.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν η τιμή ενός ονόματος μεταβλητής είναι Joel.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν καμία από τις παραπάνω προτάσεις Περίπτωσης δεν είναι αληθής/ αντιστοιχίζεται.
Κείμενο προς εκτύπωση στην κονσόλα, εάν η παραπάνω περίπτωση είναι αληθής, δηλαδή, καμία πρόταση Case δεν ταιριάζει.
Τέλος της δήλωσης Επιλογή.
Αυτή η δήλωση θα εκτυπώσει κάποιο κείμενο στην οθόνη, ανεξάρτητα από το εάν μια δήλωση Case αντιστοιχεί ή όχι. Πάντα θα εκτελείται.
Παύση του παραθύρου της κονσόλας για λίγο, περιμένοντας κάποιος χρήστης να κάνει κάποια ενέργεια για να το κλείσει.
Λήξη της κύριας υποδιαδικασίας.
Τέλος της ενότητας.

Παράδειγμα 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 και πατήστε το πλήκτρο enter. Θα πρέπει να λάβετε τα εξής:

Εδώ είναι ένα στιγμιότυπο οθόνης του κώδικα:

Επεξήγηση Κώδικα:

Δημιουργία μιας ενότητας με το όνομα Module1.
Έναρξη της κύριας υποδιαδικασίας.
Εκτύπωση κειμένου στην κονσόλα που δίνει εντολή στον χρήστη να εισαγάγει το όνομά του.
Δημιουργία μιας μεταβλητής συμβολοσειράς με όνομα όνομα και προτροπή στον χρήστη να εισαγάγει μια τιμή για αυτήν τη μεταβλητή στην κονσόλα.
Η τιμή του ονόματος της μεταβλητής θα χρησιμοποιηθεί για την εκτέλεση συγκρίσεων με τις διάφορες προτάσεις Case για την εύρεση μιας αντιστοίχισης.
Αν η τιμή του ονόματος της μεταβλητής είναι John.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν η τιμή του ονόματος της μεταβλητής είναι Guru99.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν η τιμή του ονόματος της μεταβλητής είναι Alice.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Αν η τιμή του ονόματος της μεταβλητής είναι Joel.
Κείμενο προς εκτύπωση στην κονσόλα εάν η παραπάνω περίπτωση είναι αληθής/ταιριασμένη.
Εάν καμία από τις παραπάνω προτάσεις Περίπτωσης δεν είναι αληθής/ αντιστοιχίζεται.
Κείμενο προς εκτύπωση στην κονσόλα, εάν η παραπάνω περίπτωση είναι αληθής, δηλαδή, καμία πρόταση Case δεν ταιριάζει.
Τέλος της δήλωσης Επιλογή.
Αυτή η δήλωση θα εκτυπώσει κάποιο κείμενο στην οθόνη, ανεξάρτητα από το εάν μια δήλωση Case αντιστοιχεί ή όχι. Πάντα θα εκτελείται.
Παύση του παραθύρου της κονσόλας για λίγο, περιμένοντας κάποιος χρήστης να κάνει κάποια ενέργεια για να το κλείσει.
Λήξη της κύριας υποδιαδικασίας.
Τέλος της ενότητας.

Λειτουργίες ToLower() και ToUpper() στο VB.Net

Η δήλωση Select Case κάνει διάκριση πεζών-κεφαλαίων. Αυτό σημαίνει ότι θα αντιμετωπίζει το guru99 ως διαφορετικό από το Guru99. Ωστόσο, μπορούμε να χρησιμοποιήσουμε τις συναρτήσεις ToLower() και ToUpper() για να χειριστούμε το ζήτημα μιας υπόθεσης με αυτήν τη δήλωση.

Παράδειγμα ToLower() και ToUpper() στο VB.Net

Ακολουθεί ένα παράδειγμα της συνάρτησης ToLower() και ToUpper() στο VB.Net:

Βήμα 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) Πληκτρολογήστε το όνομα Guru99 (το G είναι κεφαλαίο) και πατήστε το πλήκτρο enter στο πληκτρολόγιό σας. Θα πρέπει να λάβετε τα εξής:

Εδώ είναι ένα στιγμιότυπο οθόνης του κώδικα:

Επεξήγηση Κώδικα:

Κωδικός γραμμή 5: Η τιμή του ονόματος της μεταβλητής θα χρησιμοποιηθεί για την εκτέλεση συγκρίσεων με τις διάφορες προτάσεις Case για την εύρεση μιας αντιστοίχισης. Η συνάρτηση ToLower() θα διασφαλίσει ότι οποιοδήποτε όνομα πληκτρολογεί ο χρήστης θα μετατραπεί πρώτα σε πεζά πριν από την αξιολόγηση των δηλώσεων Case. Αυτό σημαίνει ότι εάν ο χρήστης πληκτρολογήσει Guru99, θα μετατραπεί αμέσως σε guru99, τότε γίνεται η αξιολόγηση των δηλώσεων Case. Εάν ο χρήστης πληκτρολογήσει John, θα μετατραπεί αμέσως σε john πριν γίνει η αξιολόγηση των δηλώσεων Case.

Ο υπόλοιπος κώδικας είναι ίδιος με τον παραπάνω.

Σύνοψη

Η δήλωση Select Case που παρέχεται από το VB.NET σάς βοηθά να αξιολογήσετε μια τιμή έναντι ενός συνόλου τιμών μέσω αντιστοίχισης.
Είναι κατάλληλο μόνο εάν οι πιθανές τιμές της εν λόγω μεταβλητής είναι γνωστό ότι είναι περιορισμένες.
Η δήλωση Select Case κάνει διάκριση πεζών-κεφαλαίων.
Μπορείτε να χρησιμοποιήσετε τις συναρτήσεις ToLower() και ToUpper() για να μετατρέψετε τις συμβολοσειρές σε πεζά και κεφαλαία αντίστοιχα.

Μπορεί να σας αρέσει:

Τι είναι το Select Case στο VB.Net;

Σύνταξη δήλωσης επιλογής περίπτωσης στο VB.Net

VB.Net Επιλέξτε Παραδείγματα προγράμματος δήλωσης περίπτωσης

ΣΧΕΤΙΚΑ ΑΡΘΡΑ

Παράδειγμα 2

Λειτουργίες ToLower() και ToUpper() στο VB.Net

Παράδειγμα ToLower() και ToUpper() στο VB.Net

Σύνοψη