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:
Zde je snímek obrazovky kódu, který jsme použili:
Vysvětlení kódu:
- Vytvoření modulu s názvem Module1.
- Zahájení hlavního dílčího postupu.
- Vytvoření řetězcové proměnné s názvem name.
- Přiřazení hodnoty Guru99 k názvu proměnné.
- Hodnota názvu proměnné se použije k porovnání s různými příkazy Case, aby se našla shoda.
- Pokud je hodnota názvu proměnné John.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Guru99.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Alice.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Joel.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud žádný z výše uvedených případů není pravdivý/odpovídá.
- Text, který se má vytisknout na konzole, pokud je výše uvedený případ pravdivý, to znamená, že žádný příkaz Case neodpovídá.
- Konec příkazu Select.
- 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.
- Pozastavte okno konzoly na chvíli a počkejte, až uživatel provede akci a zavře jej.
- Konec hlavního dílčího postupu.
- 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í:
Krok 4) Zadejte název Guru99 a stiskněte klávesu Enter. Měli byste získat následující:
Zde je snímek obrazovky kódu:
Vysvětlení kódu:
- Vytvoření modulu s názvem Module1.
- Zahájení hlavního dílčího postupu.
- Vytištění nějakého textu na konzoli s pokynem pro uživatele, aby zadal své jméno.
- Vytvoření řetězcové proměnné s názvem name a výzva k zadání hodnoty této proměnné na konzole.
- Hodnota názvu proměnné se použije k porovnání s různými příkazy Case za účelem nalezení shody.
- Pokud je hodnota názvu proměnné John.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Guru99.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Alice.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud je hodnota názvu proměnné Joel.
- Text k vytištění na konzole, pokud je výše uvedený případ pravdivý/odpovídající.
- Pokud žádný z výše uvedených případů není pravdivý/odpovídá.
- Text, který se má vytisknout na konzole, pokud je výše uvedený případ pravdivý, to znamená, že žádný příkaz Case neodpovídá.
- Konec příkazu Select.
- 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.
- Pozastavte okno konzoly na chvíli a počkejte, až uživatel provede akci a zavře jej.
- Konec hlavního dílčího postupu.
- 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:
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í:
Zde je snímek obrazovky kódu:
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().