Vyberte Case Statement ve VB.Net s příklady

Co je Select Case ve VB.Net?

Vyberte případ je podmíněný příkaz, který vám pomůže otestovat proměnnou na rovnost vůči sadě hodnot. Každá hodnota je označována jako případ a proměnná, která se zapíná, by měla být zkontrolována pro všechny vybrané případy.

Příkaz Select Case vám poskytuje snadný způsob testování obsahu proměnné. Je však vhodný pouze pro použití, když má daná proměnná pouze omezený počet možností.

Syntaxe příkazu Select Case ve VB.Net

Příkaz Select Case je deklarován ve VB.Net pomocí následující syntaxe:

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

Popišme parametry použité v syntaxi:

  • tvůj_výraz: označuje výraz, který je vyhodnocen jako jeden z elementárních Typy dat podporováno v Microsoft VB.NET.
  • seznam_výrazů: klauzule výrazu, které označují shodné hodnoty výrazu. V případě více klauzulí je oddělte čárkou (,).
  • prohlášení: příkazy, které následují za Case a provádějí se poté, co se výběrový výraz shoduje s klauzulí v seznamu výrazů.
  • další prohlášení: příkazy, které následují za Case Else a spouštějí se, jakmile výraz select neodpovídá žádné z klauzulí v seznamu výrazů pro jakýkoli příkaz Case.

Příklady programů VB.Net Select Case Statement

Použijme příklad, abychom demonstrovali, jak používat prohlášení Select Case ve VB.Net:

Krok 1) Nejprve vytvořte novou konzolovou aplikaci.

Krok 2) Použijte následující kód:

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

Krok 3) Kliknutím na tlačítko Start na horní liště spustíte program. Dá vám to následující výsledek:

VB.Net Select Case Statement

Zde je snímek obrazovky kódu, který jsme použili:

VB.Net Select Case Statement

Vysvětlení kódu:

  1. Vytvoření modulu s názvem Module1.
  2. Zahájení hlavního dílčího postupu.
  3. Vytvoření řetězcové proměnné s názvem name.
  4. Přiřazení hodnoty Guru99 k názvu proměnné.
  5. Hodnota názvu proměnné se použije k porovnání s různými příkazy Case, aby se našla shoda.
  6. Pokud je hodnota názvu proměnné John.
  7. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  8. Pokud je hodnota názvu proměnné Guru99.
  9. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  10. Pokud je hodnota názvu proměnné Alice.
  11. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  12. Pokud je hodnota názvu proměnné Joel.
  13. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  14. Pokud žádný z výše uvedených případů není pravdivý/odpovídá.
  15. Text, který se má vytisknout na konzole, pokud je výše uvedený případ pravdivý, to znamená, že žádný příkaz Case neodpovídá.
  16. Konec příkazu Select.
  17. Tento výpis vytiskne na obrazovku nějaký text bez ohledu na to, zda byl výrok Case shodný nebo ne. Vždy se provede.
  18. Pozastavte okno konzoly na chvíli a počkejte, až uživatel provede akci a zavře jej.
  19. Konec hlavního dílčího postupu.
  20. Konec modulu.

Příklad 2

Můžete také umožnit uživateli zadat jméno, na základě kterého se rozhodnete.

Krok 1) Vytvořte novou konzolovou aplikaci.

Krok 2) Použijte následující kód:

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

Krok 3) Proveďte jej kliknutím na tlačítko Start na horní liště. Mělo by vrátit následující:

VB.Net Select Case Statement

Krok 4) Zadejte název Guru99 a stiskněte klávesu Enter. Měli byste získat následující:

VB.Net Select Case Statement

Zde je snímek obrazovky kódu:

VB.Net Select Case Statement

Vysvětlení kódu:

  1. Vytvoření modulu s názvem Module1.
  2. Zahájení hlavního dílčího postupu.
  3. Vytištění nějakého textu na konzoli s pokynem pro uživatele, aby zadal své jméno.
  4. Vytvoření řetězcové proměnné s názvem name a výzva k zadání hodnoty této proměnné na konzole.
  5. Hodnota názvu proměnné se použije k porovnání s různými příkazy Case za účelem nalezení shody.
  6. Pokud je hodnota názvu proměnné John.
  7. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  8. Pokud je hodnota názvu proměnné Guru99.
  9. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  10. Pokud je hodnota názvu proměnné Alice.
  11. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  12. Pokud je hodnota názvu proměnné Joel.
  13. Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
  14. Pokud žádný z výše uvedených případů není pravdivý/odpovídá.
  15. Text, který se má vytisknout na konzole, pokud je výše uvedený případ pravdivý, to znamená, že žádný příkaz Case neodpovídá.
  16. Konec příkazu Select.
  17. Tento výpis vytiskne na obrazovku nějaký text bez ohledu na to, zda byl výrok Case shodný nebo ne. Vždy se provede.
  18. Pozastavte okno konzoly na chvíli a počkejte, až uživatel provede akci a zavře jej.
  19. Konec hlavního dílčího postupu.
  20. Konec modulu.

Funkce ToLower() a ToUpper() ve VB.Net

Příkaz Select Case rozlišuje velká a malá písmena. To znamená, že bude s guru99 zacházet jako s odlišným od Guru99. Můžeme však použít funkce ToLower() a ToUpper() k řešení problému případu s tímto příkazem.

Příklad ToLower() a ToUpper() ve VB.Net

Zde je příklad funkcí ToLower() a ToUpper() ve VB.Net:

Krok 1) Vytvořte novou konzolovou aplikaci.

Krok 2) Použijte následující kód:

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

Krok 3) Kliknutím na tlačítko Start na horní liště spustíte kód. Měli byste získat následující výstup:

Funkce ToLower() a ToUpper().

Krok 4) Zadejte název Guru99 (G je velké) a stiskněte klávesu Enter na klávesnici. Měli byste získat následující:

Funkce ToLower() a ToUpper().

Zde je snímek obrazovky kódu:

Funkce ToLower() a ToUpper().

Vysvětlení kódu:

Řádek kódu 5: Hodnota názvu proměnné se použije k porovnání s různými příkazy Case za účelem nalezení shody. Funkce ToLower() zajistí, že jakékoli jméno, které uživatel zadá, bude před vyhodnocením příkazů Case nejprve převedeno na malá písmena. To znamená, že pokud uživatel zadá Guru99, bude okamžitě převeden na guru99, poté je provedeno vyhodnocení příkazů Case. Pokud uživatel zadá John, bude to okamžitě převedeno na John, než se provede vyhodnocení příkazů Case.

Zbytek kódu je stejný jako výše.

Shrnutí

  • Příkaz Select Case poskytovaný VB.NET vám pomáhá vyhodnotit hodnotu oproti sadě hodnot pomocí párování.
  • Je vhodný pouze tehdy, je-li známo, že možné hodnoty dané proměnné jsou omezené.
  • Příkaz Select Case rozlišuje velká a malá písmena.
  • K převodu řetězců na malá a velká písmena můžete použít funkce ToLower() a ToUpper().