
29/04/2005, 11:45
|
 | | | Fecha de Ingreso: agosto-2004 Ubicación: Santa Rosa, La Pampa, Argentina
Mensajes: 1.484
Antigüedad: 20 años, 8 meses Puntos: 13 | |
Funcion DateAdd Simple. Hay que utilizar la función DateAdd. Suponiendo que la fecha este en el Text1.Text sería:
Text1.Text = DateAdd("m", 1, Text1.Text)
Esta tiene tres parametros: El intervalo, que en este caso es la "m" y hace que lo que se aumente sea el mes. Puede ser "yyyy" (año), "q" (trimestre), "y" (día del año), "d" (día), "w" (día de la semana), "ww" (semana), "h" (hora), "n" (minuto) y , "s" (segundo). El segundo parámetro es cuánto del intervalo querés agregar. En este caso es 1, y avanzaría 1 mes. Por último, cual es la fecha que querés sumar. En el ejemplo se sumaría la fecha almacenada en Text1.text.
Lo mejor de todo es que valida el tema de los años bisiestos y de los meses que tienen 30 y 31. Es decir nunca te va a quedar un 31 de febrero o de abril.
Espero que haya servido. Saludos. Lucas |