Sumar un entero a una fecha
Publicado por Alberto (115 intervenciones) el 23/03/2018 10:14:52
Lo he visto en varios sitios de la red, muy fácil, pero... no me funciona.
TextVcto = TextIni + 5
me da "Error en tiempo de ejecución. No coinciden los tipos."
he visto en todos sitios que esto debería dar como resultado por ejemplo
TextIni = 10/10/2018
TextVcto = 15/10/2018 sin más problema.
Los campos están definidos TextIni y TextVcto como fecha corta y en las textBox también como "fecha" y donde entro el "5" es un campo que está definido como entero tanto en la BD como en la textbox.
¿Dónde está el problema? Veo el código y me aparece bien TextIni = "10/10/2018" y TextVcto = "15/10/2018".
Por ver si conseguía que se callara el protestón he "comentado" el On Error Resume Next y las líneas que se relacionan con el error. Es igual, erre que erre: "No coinciden los tipos". He visto que con Visual net se utiliza Fecha2 = Fecha1.AddDays(5) pero yo utilizo el VB 6.0 y no me admite lo de AddDays(). No sé si debería haber puesto en vez de TextIni un MaskEdBox, pero eso no lo he visto en ningún sitio.
¿Alguna solución? Muchas gracias.
TextVcto = TextIni + 5
me da "Error en tiempo de ejecución. No coinciden los tipos."
he visto en todos sitios que esto debería dar como resultado por ejemplo
TextIni = 10/10/2018
TextVcto = 15/10/2018 sin más problema.
Los campos están definidos TextIni y TextVcto como fecha corta y en las textBox también como "fecha" y donde entro el "5" es un campo que está definido como entero tanto en la BD como en la textbox.
¿Dónde está el problema? Veo el código y me aparece bien TextIni = "10/10/2018" y TextVcto = "15/10/2018".
Por ver si conseguía que se callara el protestón he "comentado" el On Error Resume Next y las líneas que se relacionan con el error. Es igual, erre que erre: "No coinciden los tipos". He visto que con Visual net se utiliza Fecha2 = Fecha1.AddDays(5) pero yo utilizo el VB 6.0 y no me admite lo de AddDays(). No sé si debería haber puesto en vez de TextIni un MaskEdBox, pero eso no lo he visto en ningún sitio.
¿Alguna solución? Muchas gracias.
Valora esta pregunta
0
