Valige VB.Net'is Case Statement koos näidetega

Mis on VB.Netis Select Case?

Valige Case on tingimuslause, mis aitab testida muutuja võrdsust väärtuste komplektiga. Iga väärtust nimetatakse juhtumiks ja sisselülitatavat muutujat tuleks kontrollida kõigi valitud juhtumite puhul.

Lause Select Case pakub lihtsat viisi muutuja sisu testimiseks. Kuid see sobib kasutamiseks ainult siis, kui kõnealusel muutujal on vaid piiratud arv valikuid.

VB.Neti juhtumite väljavõtte süntaks

Select Case'i lause deklareeritakse VB.Net kasutades järgmist süntaksit:

Select [ Case ] your_expression
   [ Case expression_list
      [ statement(s) ] ]
   [ Case Else
      [ else statement(s) ] ]
End Select

Kirjeldame süntaksis kasutatavaid parameetreid:

• sinu_väljend: see tähistab avaldist, mis annab ühele elementaarväärtusest Andmetüübid sisse toetatud Microsoft VB.Net.
• väljendite_loend: avaldise klauslid, mis tähistavad avaldise vasteväärtusi. Mitme klausli korral eraldage need komaga (,).
• avaldus(ed): avaldused, mis järgivad käänet Case ja käivitatakse pärast seda, kui avaldis select on ühtinud mis tahes klausliga avaldise_loendis.
• muud avaldused: laused, mis järgivad Case Else'i ja käitatakse siis, kui valikavaldis ei vasta ühelegi Case-lause avaldise_loendis olevale klauslile.

VB.Net Select Case Statement programmi näited

Näite abil demonstreerime, kuidas kasutada VB.Netis Select Case lauset:

Step 1) Esiteks looge uus konsoolirakendus.

Step 2) Kasutage järgmist koodi:

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

Step 3) Programmi käivitamiseks klõpsake ülemisel ribal nuppu Start. See annab teile järgmise tulemuse:

Siin on ekraanipilt kasutatud koodist:

Selgitus Code:

1. Mooduli Module1 loomine.
2. Põhilise alamprotseduuri algus.
3. Stringmuutuja nimega loomine.
4. Väärtuse määramine Guru99 muutuja nimele.
5. Muutuja nime väärtust kasutatakse vaste leidmiseks võrdluste tegemiseks erinevate Case-lausetega.
6. Kui muutuja nime väärtus on John.
7. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
8. Kui muutuja nime väärtus on Guru99.
9. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
10. Kui muutuja nime väärtus on Alice.
11. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
12. Kui muutuja nime väärtus on Joel.
13. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
14. Kui ükski ülaltoodud Case-lausetest ei ole tõene/, on sobiv.
15. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene, st ükski Case-lause ei sobi.
16. Valimise avalduse lõpp.
17. See avaldus prindib ekraanile osa tekstist olenemata sellest, kas Case lause sobis või mitte. See täidetakse alati.
18. Peatage konsooliaken mõneks ajaks, oodates, kuni kasutaja selle sulgemiseks midagi ette võtab.
19. Peamise alamprotseduuri lõpp.
20. Mooduli lõpp.

Näiteks 2

Samuti võite lasta kasutajal nime sisestada ja seejärel selle põhjal otsuse langetada.

Step 1) Looge uus konsoolirakendus.

Step 2) Kasutage järgmist koodi:

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

Step 3) Selle käivitamiseks klõpsake ülemisel ribal nuppu Start. See peaks tagastama järgmise:

Step 4) Sisestage nimi Guru99 ja vajutage sisestusklahvi. Peaksite saama järgmise:

Siin on koodi ekraanipilt:

Selgitus Code:

1. Mooduli Module1 loomine.
2. Põhilise alamprotseduuri algus.
3. Konsoolile teksti printimine, mis juhendab kasutajat oma nime sisestama.
4. Stringmuutuja nimega loomine ja kasutaja palumine sisestada konsoolis selle muutuja väärtus.
5. Muutuja nime väärtust kasutatakse vaste leidmiseks võrdluste tegemiseks erinevate Case-lausetega.
6. Kui muutuja nime väärtus on John.
7. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
8. Kui muutuja nime väärtus on Guru99.
9. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
10. Kui muutuja nime väärtus on Alice.
11. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
12. Kui muutuja nime väärtus on Joel.
13. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene/ühildatud.
14. Kui ükski ülaltoodud Case-lausetest ei ole tõene/, on sobiv.
15. Konsoolile prinditav tekst, kui ülaltoodud suurtäht on tõene, st ükski Case-lause ei sobi.
16. Valimise avalduse lõpp.
17. See avaldus prindib ekraanile osa tekstist olenemata sellest, kas Case lause sobis või mitte. See täidetakse alati.
18. Peatage konsooliaken mõneks ajaks, oodates, kuni kasutaja selle sulgemiseks midagi ette võtab.
19. Peamise alamprotseduuri lõpp.
20. Mooduli lõpp.

Funktsioonid ToLower() ja ToUpper() VB.Netis

Select Case käsk on tõstutundlik. See tähendab, et see käsitleb guru99-t erinevana kui Guru99. Selle lausega juhtumi probleemi lahendamiseks saame aga kasutada funktsioone ToLower() ja ToUpper().

ToLower() ja ToUpper() näide VB.Netis

Siin on näide VB.Neti funktsioonidest ToLower() ja ToUpper():

Step 1) Looge uus konsoolirakendus.

Step 2) Kasutage järgmist koodi:

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

Step 3) Koodi käivitamiseks klõpsake ülemisel ribal nuppu Start. Peaksite saama järgmise väljundi:

Step 4) Sisestage nimi Guru99 (G on suurtäht) ja vajutage klaviatuuril sisestusklahvi (Enter). Peaksite saama järgmise pildi:

Siin on koodi ekraanipilt:

Selgitus Code:

Code rida 5: Muutuja „name” väärtust kasutatakse võrdluste tegemiseks erinevate juhtumilausetega vaste leidmiseks. Funktsioon ToLower() tagab, et kõik kasutaja sisestatud nimed teisendatakse enne juhtumilausete hindamist väiketähtedeks. See tähendab, et kui kasutaja sisestab Guru99, teisendatakse see koheselt guru99-ks ja seejärel on Case-lausete hindamine lõpetatud. Kui kasutaja tipib John, teisendatakse see koheselt john-iks enne Case-lausete hindamise lõpetamist.

Ülejäänud kood on sama, mis ülal.

KKK