Visual Basic - Sumar Fechas

Life is soft - evento anual de software empresarial
 
Vista:

Sumar Fechas

Publicado por Jyns (26 intervenciones) el 09/01/2004 15:24:41
Buenas,

El problema que tengo es que quiero sumar meses o días a una fecha dada, por ejemplo:

Tengo la fecha en este formato: 10/05/2003 (DD/MM/AAAA)
y quiero sumarle por ejemplo un mes para que me de como resultado 10/06/2003, o sumarle diez días (20/05/2003) pero no se como sumarlo.

Gracias por la ayuda.

Saludos.
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:Sumar Fechas

Publicado por Than (7 intervenciones) el 09/01/2004 16:32:30
Prueba con la funcion dateadd...

Dim Fecha As Date ' Declare variables.
Dim TipoIntervalo As String
Dim Intervalo As Integer
Dim Msg
TipoIntervalo = "m" ' "m" establece el mes como intervalo.
Fecha = InputBox("Introduzca la Fecha")
Intervalo = InputBox("Digite el numero de Meses a Sumar")
'Suma el Intervalo digitado al mes de la fecha digitada...
Msg = "Nueva Fecha: " & DateAdd(TipoIntervalo, Intervalo, Fecha)
MsgBox Msg

Espero que te sirva....
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