none
Obtener cantidad de dias entre dos fechas RRS feed

  • Pregunta

  • Saludos !

    Amigos tengo el siguiente detalle, según leo cuando se utiliza la función DateDiff no se toma en cuanta el primer día, y es ahí donde esta mi problema, requiero que me sume el primer día.

    Tengo al siguiente fecha inicial: 30/07/2019 y fecha final: 01/08/2019 el resultado debería ser 2, sin embargo la función DateDiff me devuelve 1 y volviendo a lo inicial comentado, se entiende el porque..., pero como obtengo que son 2 días y no 1.

    En el presente código tengo que sumar 1 para poder actualizar el valor de control numericupdown y me de los días correctos transcurridos y hacer así unos cálculos de cobros; esto funciona para cuando es igual o superior al 02/08/2019 como fecha final, pero tengo problema para calcular número de días cuando es el rango de fechas inicialmente mencionado.

                Dim lnCantidadDias As Integer = DateDiff(DateInterval.Day, Me.DateTimePicker1.Value, Me.DateTimePicker2.Value)
                Select Case lnCantidadDias
                    Case 1
                        Me.NumericUpDown1.Value = lnCantidadDias
                    Case Else
                        Me.NumericUpDown1.Value = lnCantidadDias + 1
                End Select
    Gracias de antemano.


    miércoles, 31 de julio de 2019 3:51

Respuestas

  • Saludos !

    Lo he solucionado de la siguiente forma:

                Dim ldFecha1 As Date = Me.DateTimePicker1.Value.ToShortDateString
                Dim ldFecha2 As Date = Me.DateTimePicker2.Value.ToShortDateString
                Dim lnCantidadDias As Integer = DateDiff(DateInterval.Day, ldFecha1, ldFecha2)
                Me.NumericUpDown1.Value = lnCantidadDias
    

    Aquí la solución donde me base:Edward Gómez

    Hasta luego.

    • Marcado como respuesta Marco Bueno miércoles, 31 de julio de 2019 4:58
    miércoles, 31 de julio de 2019 4:58