none
Sumar días a una fecha manteniendo el formato

    Pregunta

  • Quiero usar el formato de fecha aaaaMMdd como 20120601 (1 de Junio de 2012). Eso lo consigo con MsgBox(Now.Date.ToString("yyyyMMdd"))

    Si quiero sumar 90 dias al de hoy seria MsgBox(DateAdd("d", 90, Now.Date), pero el formato devuelto es ddMMaaaa. Cómo puedo hacer para que me devuelva en aaaaMMdd. He puesto esto, pero no va

        Private Sub Button1_Click

            MsgBox(Now.Date.ToString("yyyyMMdd"))
            MsgBox(DateAdd("d", 90, Now.Date.ToString("yyyyMMdd")))
        End Sub

    Como seria?. Seria muy complicado hacer lo mismo pero con una fecha diferente a la de Hoy?

    Gracias

    martes, 12 de junio de 2012 8:52

Respuestas

  • Hola:

    Private Sub Button1_Click()
       Dim dFecha As Date = Now
       ' dFecha = Puedes poner la fecha que quieras '
       MsgBox(DateAdd("d",90, dFecha).ToString("yyyyMMdd"))
    End Sub

    Saludos
    • Marcado como respuesta AmFor martes, 12 de junio de 2012 9:03
    martes, 12 de junio de 2012 9:00

Todas las respuestas