none
Dia da semana RRS feed

  • Pergunta

  • Pessoal,

    Tenho uma variável tipo datatime, como faço pra pegar o dia da semana referente essa data, tipo segunda... terça... etc.

    segunda-feira, 6 de agosto de 2007 14:35

Respostas

  • Boas Davi,

    Conforme já informado acima, a propriedade DayOfWeek lhe retorna o dia da semana com base em uma data, porem, em ingles!

    Se vc quiser em Portugues, segue o exemplo:

     

    Code Snippet
    Public Shared Function ObterDiaSemana(ByVal pdt As Date) As String
            Select Case pdt.DayOfWeek
                Case DayOfWeek.Sunday
                    Return "Domingo"
                Case DayOfWeek.Monday
                    Return "Segunda-Feira"
                Case DayOfWeek.Tuesday
                    Return "Terça-Feira"
                Case DayOfWeek.Wednesday
                    Return "Quarta-Feira"
                Case DayOfWeek.Thursday
                    Return "Quinta-Feira"
                Case DayOfWeek.Friday
                    Return "Sexta-Feira"
                Case DayOfWeek.Saturday
                    Return "Sábado"
            End Select
        End Function

     

     

    segunda-feira, 6 de agosto de 2007 18:37
  • Davi,

     

    utilize a propriedade DayOfWeek da classe DateTime.

     

     


    Ricardo Oneda
    http://oneda.mvps.org/blog

    segunda-feira, 6 de agosto de 2007 14:48
    Moderador

Todas as Respostas

  • Davi,

     

    utilize a propriedade DayOfWeek da classe DateTime.

     

     


    Ricardo Oneda
    http://oneda.mvps.org/blog

    segunda-feira, 6 de agosto de 2007 14:48
    Moderador
  • Boas Davi,

    Conforme já informado acima, a propriedade DayOfWeek lhe retorna o dia da semana com base em uma data, porem, em ingles!

    Se vc quiser em Portugues, segue o exemplo:

     

    Code Snippet
    Public Shared Function ObterDiaSemana(ByVal pdt As Date) As String
            Select Case pdt.DayOfWeek
                Case DayOfWeek.Sunday
                    Return "Domingo"
                Case DayOfWeek.Monday
                    Return "Segunda-Feira"
                Case DayOfWeek.Tuesday
                    Return "Terça-Feira"
                Case DayOfWeek.Wednesday
                    Return "Quarta-Feira"
                Case DayOfWeek.Thursday
                    Return "Quinta-Feira"
                Case DayOfWeek.Friday
                    Return "Sexta-Feira"
                Case DayOfWeek.Saturday
                    Return "Sábado"
            End Select
        End Function

     

     

    segunda-feira, 6 de agosto de 2007 18:37
  • Valeu Daniel!

    segunda-feira, 6 de agosto de 2007 20:27
  • Pra que compicar tanto:


    If Date.Today.DayOfWeek = 0 Then

    DiaDaSemana = "Domingo"

    End If

    If Date.Today.DayOfWeek = 1 Then

    DiaDaSemana = "Segunda Feira"

    End If

    If Date.Today.DayOfWeek = 2 Then

    DiaDaSemana = "Terça Feira"

    End If

    If Date.Today.DayOfWeek = 3 Then

    DiaDaSemana = "Quarta Feira"

    End If

    If Date.Today.DayOfWeek = 4 Then

    DiaDaSemana = "Quinta Feira"

    End If

    If Date.Today.DayOfWeek = 5 Then

    DiaDaSemana = "Sexta Feira"

    End If

    If Date.Today.DayOfWeek = 6 Then

    DiaDaSemana = "Sábado"

    End If

    Label1.Text = DiaDaSemana & " - " & Now

    domingo, 22 de março de 2009 11:30