Consulta también:
- Vb datediff
- Error del sistema &h8000ffff visual basic - Guide
- Cheats pokemon rojo fuego visual boy advance - Guide
- Fórmula fecha excel automática - Guide
- Visual foxpro - Guide
- Buscar noticias por fecha y lugar - Guide
6 respuestas
hola ninomx2003:
aquí tenes el código
-------------------------------
'Los tres primeros valores son requeridos y los dos últimos opcionales.
'DateDiff(intervalo, fecha1, fecha2[, primerdíasemana[, primerasemanaaño]])
Private Sub Form_Load()
MsgBox "Dias de Diferencia: " & DateDiff("d", "12/06/2007", "14/06/2009")
MsgBox "Años de Diferencia: " & DateDiff("yyyy", "12/06/2007", "14/06/2009")
MsgBox "Trimestres de Diferencia: " & DateDiff("q", "12/06/2007", "14/06/2009")
MsgBox "Meses de Diferencia: " & DateDiff("m", "12/06/2007", "14/06/2009")
MsgBox "Semanas de Diferencia: " & DateDiff("ww", "12/06/2007", "14/06/2009")
MsgBox "Horas de Diferencia: " & DateDiff("h", "12/06/2007", "14/06/2009")
MsgBox "Minutos de Diferencia: " & DateDiff("n", "12/06/2007", "14/06/2009")
MsgBox "Segundos de Diferencia: " & DateDiff("s", "12/06/2007", "14/06/2009")
End Sub
Un abrazo.
Luis
aquí tenes el código
-------------------------------
'Los tres primeros valores son requeridos y los dos últimos opcionales.
'DateDiff(intervalo, fecha1, fecha2[, primerdíasemana[, primerasemanaaño]])
Private Sub Form_Load()
MsgBox "Dias de Diferencia: " & DateDiff("d", "12/06/2007", "14/06/2009")
MsgBox "Años de Diferencia: " & DateDiff("yyyy", "12/06/2007", "14/06/2009")
MsgBox "Trimestres de Diferencia: " & DateDiff("q", "12/06/2007", "14/06/2009")
MsgBox "Meses de Diferencia: " & DateDiff("m", "12/06/2007", "14/06/2009")
MsgBox "Semanas de Diferencia: " & DateDiff("ww", "12/06/2007", "14/06/2009")
MsgBox "Horas de Diferencia: " & DateDiff("h", "12/06/2007", "14/06/2009")
MsgBox "Minutos de Diferencia: " & DateDiff("n", "12/06/2007", "14/06/2009")
MsgBox "Segundos de Diferencia: " & DateDiff("s", "12/06/2007", "14/06/2009")
End Sub
Un abrazo.
Luis