Mega Code Archive

 

Categories / VB.Net Tutorial / Statements

 

Select Now DayOfWeek

public class Test    public Shared Sub Main         Dim strMessage As String         Select Case Now.DayOfWeek             Case DayOfWeek.Monday                 strMessage = "Have a nice week."             Case DayOfWeek.Friday                 strMessage = "Have a nice weekend."             Case Else                 strMessage = "Welcome back!"         End Select         Console.WriteLine(strMessage)    End Sub End class Have a nice weekend.