Specify several values in one Case statement : Select « Statements « VB.Net Tutorial

1. VB.Net Tutorial
2. Statements
3. Select

public class Test
   public Shared Sub Main
        Select Case "Bird"
            Case "Bird"
                Console.WriteLine("This animal has 2 legs.")
            Case "Horse", "Dog", "Cat"
                Console.WriteLine("This animal has 4 legs.")
            Case "Snake"
                Console.WriteLine("This animal has no legs.")
            Case "Centipede"
                Console.WriteLine("This animal has 100 legs.")
            Case Else
                Console.WriteLine("You did not select from the list!")
        End Select

   End Sub
End Class

This animal has 2 legs.