hola amigos realizando un programa de cuentas corriente me e topado con el siguiente problema.

tengo que calcular las cuotas de una compra... esto no tengo drama el problema lo tengo cuando calculo las fechas de pago osea calcular los 30 dias siguientes

ejemplo
10.000 pagados es 24 cuotas

fecha primero pago . 02/02/2007
fecha segundo pago. 02/03/2007
-
-
-
-
fecha pago 02/12/2007
fecha pago02/01/2008 ?????

como calculo el cambio de año y el cambio de meses ?????????


ojala que me puedan ayudar
gracias...

Private Sub Form_Load()
Dim fecha As Date

fecha = "02/01/2006"

For i = 1 To 24
fecha = fecha + 30
Print fecha
Next i

End SubEdited by: Guspo_pk

ok grx lo implementare en mi codigo

Podés usar Dateadd

Código:

Private Sub Command1_Click()
Call Generar("02/02/2007")
End Sub

Sub Generar(Fecha As Date)
Dim i As Byte

For i = 1 To 12

 Me.Print DateAdd("m", i, Fecha)
Next

End Sub

saludos