Visual Basic - Cómo obteber el ULTIMO DIA (número) de un mes

Life is soft - evento anual de software empresarial
 
Vista:

Cómo obteber el ULTIMO DIA (número) de un mes

Publicado por Eduardo Yuptón (96 intervenciones) el 29/03/2007 19:32:55
HOLA:

Alguien puede decirme como obtener el último dia (en número) de cualquier mes de cualquier año que Yo elija.

Existe alguna función o por algún procedimiento?

Muchas Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cómo obteber el ULTIMO DIA (número) de un mes

Publicado por Pere (54 intervenciones) el 29/03/2007 22:51:28
Mira aquí, tienes lo que buscas.

http://lawebdelprogramador.com/news/mostrar_new.php?id=96&texto=Visual+Basic+Avanzado&n1=304739&n2=1&n3=0&n4=0&n5=0&n6=0&n7=0&n8=0&n9=0&n0=0

Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cómo obteber el ULTIMO DIA (número) de un mes

Publicado por Pere (54 intervenciones) el 30/03/2007 13:28:26
Conduce aquí:


En un TextBox puse de Fecha "19/07/2005"

Function UltimoDiaMes2(Fecha As Date) As Byte
UltimoDiaMes2 = Day(DateSerial(Year(Fecha), Month(Fecha) + 1, 0))
End Function

Private Sub Command1_Click()
MsgBox "Ultimo dia del mes en Numero es : " & UltimoDiaMes2(Text1) & Chr(13) & Chr(13) & "En Letra es : " & Format(DateValue(UltimoDiaMes2(Text1) & "/" & Month(Text1) & "/" & Year(Text1)), "dddd")
End Sub
El MsgBox me dice que el mes de Julio tiene 31 dias y ese ultimo es Domingo

Le da, además del número, la fecha en texto.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar