como sumo un mes a un mes?

[lexus]

detalle = Replace(detalle, "enero", monthname(month(now)))


Hola, como sumo un mes a este replace?


lo que intento hacer es que si encuentra enero, lo reemplace por febrero, si encuentra febrero por marzo y asi sucesivamente.


gracias.

[urjose]

Fecha=Cdate("01/01/2002")
Mes=Month(Fecha)+1
FechaFinal=Day(fecha)&"/"&Mes&"/"&Year(Fecha)

Algo asi te debe funcionar o weno la idea es esa