'Este exemplo mostra como obter o dia da semana no formato
'longo. Ex: domingo, segunda-feira, etc...

Module Module1
  Sub Main()
    Dim agora As DateTime = DateTime.Now

    'obtém o dia da semana no formato longo
    Dim diaSemana As String = Format(agora, "dddd")

    Console.WriteLine("O dia da semana é: " & diaSemana)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module