Ajuda - datas em registros

Bom dia amigos
Preciso de ajuda em um formulário que é o seguinte:
A cada registro, preciso que ele mostre a data e no próximo acrescente mais 30, e no outro mês, mais 30...

Bom dia,
Não entendi. Se a cada registo coloca a data, como é que no próximo acrescenta mais 30 (dias? meses? ...)
Explique melhor e pode disponibilizar a bd

Acredito que não tenha necessidade de enviar o banco amigo, é assim:
Eu tenho 2 campos, data de pagamento e valor .
Só que eu queria que a data de pagamento fosse automática, que ao clicar no registro ela me mandasse a data do dia, e quando eu fosse para o próximo registro ela viesse acrescentando mais 30 dias. Por exemplo:

Data de pagamento Valor
20/06/2014 R$30,00

quando eu clicar na linha de baixo para o próximo registros ficará

20/07/2014
20/08/2014
20/09/2014

Será que existe uma maneira de fazer isso?

No controlo da DataPagamento, acontecimento AoEntrar, coloque
TxtDataPagamento=Dateadd("d",30,dmax("DataPagamento","Tabela"))

Tem como você mandar um exemplo para mim amigo? Não funcionou.
Estou enviando o banco para você ver onde estou errando.

Desta gostei. precisa de ajuda. Não precisa de me disponibilizar a bd mas pede que lhe construa uma bd para ver

tem como me ajudar? estou quebrando a cabeça tem 1 semana

segue o banco

Desde manhã que lhe disse que podia disponibilizar a bd. Comprima-a e disponibilize pelo fórum ou através do dropbox

Não estou conseguindo enviar, posso te mandar pro e-mail? me passa seu e-mail por favor

criei rapidinho um outro banco, dá uma olhada se tem como me ajudar.

Informei considerando que o controlo se chamava TxtDataPagamento (por ser nome normalizado) mas nomeou datapagamento
Altere para TxtDataPagamento e coloque ao entrar do controlo
If IsNull(Txtdatapagamento) Then Txtdatapagamento = DateAdd("d", 30, DMax("DataPagamento", "Tabela1"))

Boa tarde !

Veja se isso ajuda.

http://www.4shared.com/zip/zS4HL2OGce/testefredpitassi.html

Att, Danilo

Danilo, a ideia é essa mesmo, só que eu só preciso atualizar a data. Quando for a vista já resolvi, preciso para quando for de 2x, 3x, 4x ou 5x

Teria como explicar melhor, pois pelo que você passou acima , eu entendi desta forma que envie o banco.

Att, Danilo

Claro, com certeza, o que você me mandou é exatamente isso que eu preciso.
Eu tenho os campos

Forma de pagamento e valor

Eu preciso clicar e a cada clique a data ande 30 dias

Exemplo:
registro 1:
cliquei vem a data de hoje

registro 2:cliquei e vem a data 20/07/2104

registro 3: cliquei e vem a data 20/08/2014

registro 4: cliquei e vem a data 20/09/2014

registro 5: cliquei e vem a data 20/10/2014

Alexandre, do jeito que me passou deu certo, só que eu preciso que ela atualize a cada registro:

Registro 1 mantenha a data do dia corrente

Registro 2 some 30 dias

Registro 3 some 60 dias

Registro 4 some 90 dias

Registro 5 some 120 dias

Mas está a somar 30 dias !

Sim amigo, só que eu preciso que some a cada mês.
Fiz um if aqui, dá uma olhada se está legal.

Para acresccentar 1 mês
If IsNull(Txtdatapagamento) Then Txtdatapagamento = DateAdd("m", 1, DMax("DataPagamento", "Tabela1"))

Deu certo aqui dos dois jeitos Alexandre, vou acrescentar esse procedimento no meu sistema amanhã cedo e lhe falo se deu certo a implementação. Muito obrigado amigos.