Problemas con fechas

Iniciado por David Vans, 28 Junio 2010, 20:26 PM

0 Miembros y 1 Visitante están viendo este tema.

David Vans

Hola Amigos

Queria saber si hay ulguna funcion hecha o algo que le pase una fecha y la actual y me de como resultado por ejmplo:

si han pasado menos de 60 segundos =  segundos que han pasado
si han pasado mas de 60 segundos pero menos que un hora = devolver munutos
y asi sucesivamente hasta llegar al año pasando por horas dias y meses y años

Estoy hacindo algo asi pero me lio un poco

    Public Shared Function getTiemes(ByVal dateantiguo As DateTime) As Integer

        Dim Second As Long = DateDiff(DateInterval.Second, dateantiguo, DateTime.Now)
        If Second > (60 * 60 * 23) Then
            'esto nos devolvera los segundos
        ElseIf Second > (60 * 60) Then
            'esto nos devolvera las horas
        ElseIf Second > (60) Then
            'esto los dias
        ElseIf '....
        End If

    End Function


Lo que hago es sacar los segundos entre las dos fechas. y dependiendo de los segundos intento calcular el intervalo que pasa en segudos , minutos , horas, dias, meses y años.

Un saludo


David Vans

Hola

Hola: Si existe una función:

DateDiff


En el ejemplo de arriba lo uso para sacar los segundos que han pasado entre dos fechas y  lo que quero es saber si los segundos pasan de 60 que me devuelva un minuto o 2 minutos o 3 minutos y si pasa de 60 minutos que me deveulva 1 dia ,2 dias hasta los meses y años

un saludo

ssccaann43 ©

He visto por la web un source que muestra el tiempo transcurrido desde una fecha hasta otra... Mostrando desde milisegundos incluso...! Si la encuentro lo posteo...
- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"