Public Enum workDays
Saturday
Sunday = 0
Monday
Tuesday
Wednesday
Thursday
Friday
invalid = -1
End Enum
Public Class Tester
Public Shared Sub Main
Dim MyDay As WorkDays
MyDay = WorkDays.Saturday
If MyDay < workDays.FriDay Then
Console.WriteLine("It's the weekend.Invalid work day!")
End If
End Sub
End Class
It's the weekend.Invalid work day!