Skip to content

Instantly share code, notes, and snippets.

@AnthonyDGreen
Created February 3, 2019 13:43
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save AnthonyDGreen/bd642061896246c9336255881fb78546 to your computer and use it in GitHub Desktop.
Module Program
Sub Main()
Select Case Today.DayOfWeek
Case DayOfWeek.Monday,
DayOfWeek.Tuesday,
DayOfWeek.Wednesday,
DayOfWeek.Thursday,
DayOfWeek.Friday
Dim message = "Get to work!"
Case DayOfWeek.Saturday,
DayOfWeek.Sunday
Dim message = "Funtime!"
End Select
End Sub
End Module
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment