pegar o nome do dia da semana no vb.net

pegar o nome do dia da semana no vb.net

A função abaixo retorna o nome do dia da semana quando passado uma data.

Function NomeDiaDaSemana(ByVal data As DateTime) As String NomeDiaDaSemana = "" Dim dia As Integer = data.DayOfWeek If dia = 0 Then Return "Domingo" If dia = 1 Then Return "Segunda - Feira" If dia = 2 Then Return "Terça - Feira" If dia = 3 Then Return "Quarta - Feira" If dia = 4 Then Return "Quinta - Feira" If dia = 5 Then Return "Sexta - Feira" If dia = 6 Then Return "Sábado" End Function



Veja Também