Desde ya agradecer cualquier ayuda sugerencia o critica.
Les comento que tengo que trabajar con la fecha del sistema, y a esta fecha sumarle un mes, en eso no hay problema ya que lo hago de esta forma:
Código:
fecha = Format(Date, "dd-mm-yyyy")
txtFecha=DateAdd("m", 1, fecha)
Hasta aca, no hay problemas pero se me hace necesario que la fecha quede siempre con dia 30.
Por ejemplo si la fecha de sistema es 14-07-2009 y si le sumo 1 mes ocupando La funcion DateAdd me quedaria 14-08-2009, pero necesito que le sume un mes y ademas quede apuntando siempre la dia 30 osea 30-08-2009 y bueno para el caso de febrero que me apunte al dia 28.
Bueno espero haberme explicado bien, nuevamente Gracias.