Date Time VB.Net

Module Module1
    Sub Main()
        If (Weekday(Now) = vbSaturday) Or (Weekday(Now) = vbSunday) Then
            System.Console.WriteLine("weekend")
        Else
            System.Console.WriteLine("working day")
        End If
    End Sub
End Module