|
|
Postada em 01/11/2005 09:37 hs
Como faço para descobrir o mês de uma data qualquer ? Ex. 01/11/2005 = Novembro Obrigado !
Rodrigo Ferreira MSN - rjpferreira@hotmail.com
|
|
|
|
|
|
|
|
Postada em 01/11/2005 11:07 hs
|
|
|
|
|
|
Postada em 01/11/2005 11:30 hs
format(<campo com a data>, "mmmm") Neto www.netosbs.com |
|
|
|
|
|
Postada em 01/11/2005 12:30 hs
Depois crie um array ou um case para controlar qual mês é... Abraços
Gustavo Boese
|
|
|
|
Donkey
|
PRESIDENTE PRUDENTE
SP - BRASIL
|
|
Postada em 01/11/2005 12:54 hs
Function Retorna_Mes(Data as date) As String
'retorna nome do mes
Select Case month(data)
Case Is = 1
Retorna_Mes = "Janeiro"
Case Is = 2
Retorna_Mes = "Fevereiro"
Case Is = 3
Retorna_Mes = "Março"
Case Is = 4
Retorna_Mes = "Abril"
Case Is = 5
Retorna_Mes = "Maio"
Case Is = 6
Retorna_Mes = "Junho"
Case Is = 7
Retorna_Mes = "Julho"
Case Is = 8
Retorna_Mes = "Agosto"
Case Is = 9
Retorna_Mes = "Setembro"
Case Is = 10
Retorna_Mes = "Outubro"
Case Is = 11
Retorna_Mes = "Novembro"
Case Is = 12
Retorna_Mes = "Dezembro"
End Select
End Function Coloque num modulo, e pronto... vc chama passando a data ele te retorna o nome do mes. T+ |
|
|
|
|
|
|
