|
|
|
|
|
Dicas
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
|
Título da Dica: Pegar o ultimo dia do mes
|
|
|
|
Postada em 14/2/2004 por Rochª
Esta rotina pega o ultimo dia do mes.
'Devolve o ultimo dia do mes Function ULTIMO_DIA_MES(ano, mes) As Integer ULTIMO_DIA_MES = Day(DateSerial(ano, mes + 1, 1) - 1) End Function
|
|
|
|
|