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
|