Chapter 5 - VB.Net by Schneider
38
Example 7
•
Function NumDays(ByVal season As String) _
•
As Integer
•
Select Case season.ToUpper
•
Case "WINTER"
•
Return 87
•
Case "SPRING"
•
Return 92
•
Case "SUMMER", "AUTUMN", "FALL"
•
Return 93
•
End Select
•
End Function