Sintaxis Para Obtener Num Dias Transcurridos de una Periodo

13/11/2006 - 19:49 por dhvilla | Informe spam

Hola Grupo:

No se como va la sintaxis quiero hacer esto:

Dim sFecIni As String
Dim sFecFin As String
Dim fFecha As Date
Dim iDifDias As Integer

fFecha = Now
sFecIni = CStr(Now)
sFecFin = CStr(fFecha.AddMonths(3))

iDifDias = CInt(CDate(sFecFin) - CDate(sFecIni)) ' En esta parte no
se como va

Quiero saber cuantos han transcurrido desde una Fecha Inicial y una Final

Me pueden ayudar...

Salu2 Cordiales

¸,ø¤º°`°º¤ø,¸ L.I. Daniel H. Villa°`°º¤ø,¸¸,ø¤º°

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 canel

13/11/2006 - 20:06 | Informe spam

Quiero saber cuantos han transcurrido desde una Fecha Inicial y una Final

Prueba esto:

int = Fecha1.Subtract(Fecha2).TotalDays

donde:

int es una variable Integer que almacenará la diferencia

Responder a este mensaje

#2 dhvilla

13/11/2006 - 20:10 | Informe spam

Ya lo encontre:

fFecha = Now
sFecIni = CStr(Now)
sFecFin = CStr(fFecha.AddMonths(3))

iDifDias = DateDiff(DateInterval.Day, CDate(sFecIni), CDate(sFecFin))

Salu2 Cordiales

¸,ø¤º°`°º¤ø,¸ L.I. Daniel H. Villa°`°º¤ø,¸¸,ø¤º°

"dhvilla" wrote:

Hola Grupo:

No se como va la sintaxis quiero hacer esto:

Dim sFecIni As String
Dim sFecFin As String
Dim fFecha As Date
Dim iDifDias As Integer

fFecha = Now
sFecIni = CStr(Now)
sFecFin = CStr(fFecha.AddMonths(3))

iDifDias = CInt(CDate(sFecFin) - CDate(sFecIni)) ' En esta parte no
se como va

Quiero saber cuantos han transcurrido desde una Fecha Inicial y una Final

Me pueden ayudar...

Salu2 Cordiales

¸,ø¤º°`°º¤ø,¸ L.I. Daniel H. Villa°`°º¤ø,¸¸,ø¤º°

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida