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

Lause Select Case deklareeritakse VB.Netis järgmise süntaksi abil:

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

Kasutagem näidet, et näidata, kuidas VB.Netis kasutada juhtumikirjeldust:

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:

VB.Net Select Case Statement

Siin on ekraanipilt kasutatud koodist:

VB.Net Select Case Statement

Koodi selgitus:

  1. Mooduli Module1 loomine.
  2. Põhilise alamprotseduuri algus.
  3. Stringmuutuja nimega loomine.
  4. Guru99 väärtuse määramine 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 saate lubada kasutajal sisestada nime, mille selle põhjal oma otsuse teete.

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:

VB.Net Select Case Statement

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

VB.Net Select Case Statement

Siin on koodi ekraanipilt:

VB.Net Select Case Statement

Koodi selgitus:

  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

Avaldis Select Case on tõstutundlik. See tähendab, et see kohtleb guru99-t Guru99-st erinevana. 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:

Funktsioonid ToLower() ja ToUpper().

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

Funktsioonid ToLower() ja ToUpper().

Siin on koodi ekraanipilt:

Funktsioonid ToLower() ja ToUpper().

Koodi selgitus:

Koodirida 5: Muutuja nime väärtust kasutatakse vaste leidmiseks võrdluste tegemiseks erinevate Case-lausetega. Funktsioon ToLower() tagab, et kõik kasutaja sisestatud nimed muudetakse enne Case-lausete hindamist väiketähtedeks. See tähendab, et kui kasutaja tippib Guru99, teisendatakse see kohe guru99-ks, seejärel tehakse Case lausete hindamine. Kui kasutaja tippib Johni, teisendatakse see kohe enne Case-lausete hindamist jahniks.

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

kokkuvõte

  • VB.NET-i pakutav avaldus Select Case aitab teil sobitamise kaudu väärtust väärtuste komplekti suhtes hinnata.
  • See sobib ainult siis, kui on teada, et kõnealuse muutuja võimalikud väärtused on piiratud.
  • Avaldis Select Case on tõstutundlik.
  • Saate kasutada funktsioone ToLower() ja ToUpper(), et teisendada stringid vastavalt väike- ja suurtähtedeks.