Mega Code Archive
Specify several values in one Case statement
<![CDATA[
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.
]]>