Liste ed Uso di Select in VB.NET

Qualche articolo fa avevamo parlato delle condizioni utilizzando If ed avevamo anche fatto un esempio utilizzando una serie di ElseIf. Nei programmi che costuiamo potrebbe capitare ad esempio di far scegliere all’utente tra una serie di valori in una casella combinata come gli animali, creando questa lista:

1. Leone
2. Elefante
3. Tigre
4. Cavallo
5. Pinguino
6. Gatto
7. Cane

Da quello che sappiamo fino ad ora useremo una serie di If e ElseIf:

Module Corso
   Sub Main()
      Dim k As Integer = 5

      If k = 1 Then
         Console.WriteLine("Hai scelto il leone")
      ElseIf k = 2 Then
         Console.WriteLine("Hai scelto l'elefante")
      ElseIf k = 3 Then
         Console.WriteLine("Hai scelto la tigre")
      ElseIf k = 4 Then
         Console.WriteLine("Hai scelto il cavallo")
      ElseIf k = 5 Then
         Console.WriteLine("Hai scelto il pinguino")
      ElseIf k = 6 Then
         Console.WriteLine("Hai scelto il gatto")
      ElseIf k = 7 Then
         Console.WriteLine("Hai scelto il cane")
      Else
         Console.WriteLine("Non hai scelto nulla")
    End If
    Console.ReadKey()
  End Sub
End Module

Esiste un’altra istruzione molto più conveniente per le serie di valori come l’istruzione Select Case, vediamo la sintassi tramite l’esempio precedente scritto nel nuovo modo:

...
Dim k As Integer = 5

Select k
   Case 1
      Console.WriteLine("Hai scelto il leone")
   Case 2
      Console.WriteLine("Hai scelto l'elefante")
   Case 3
     Console.WriteLine("Hai scelto la tigre")
   Case 4
      Console.WriteLine("Hai scelto il cavallo")
   Case 5
      Console.WriteLine("Hai scelto il pinguino")
   Case 6
      Console.WriteLine("Hai scelto il gatto")
   Case 7
      Console.WriteLine("Hai scelto il cane")
   Case Else
      Console.WriteLine("Non hai scelto nulla")
 End Select

Console.ReadKey()
...

Vedete la differenza? E’ tutto molto più semplice ed immediato. L’istruzione Select funziona anche con i caratteri e quindi se vogliamo richiedere l’input all’utente possiamo creare un esempio in questo modo:

...
Console.WriteLine("Scegli un numero:")
Dim ch As Char = Convert.ToChar(Console.Read())

Select Case ch
   Case "1"
      Console.WriteLine("Hai scelto il leone")
   Case "2"
      Console.WriteLine("Hai scelto l'elefante")
   Case "3"
      Console.WriteLine("Hai scelto la tigre")
   Case "4"
      Console.WriteLine("Hai scelto il cavallo")
   Case "5"
      Console.WriteLine("Hai scelto il pinguino")
   Case "6"
      Console.WriteLine("Hai scelto il gatto")
   Case "7"
      Console.WriteLine("Hai scelto il cane")
   Case Else
      Console.WriteLine("Non hai scelto nulla")
End Select

Console.ReadKey()
...

Non state molto a guardare come ho fatto a richiedere l’input all’utente, concentratevi piuttosto sulle liste che il resto lo faremo in futuro. Se avete dei dubbi o domande vi ricordo ancora il nostro forum sulla programmazione.

<< Lezione Precedente – Inizio Corso – Lezione Successiva >>