Incluir número sequencial em um formulário.

[Exacon]

Pessoal, mais uma sobre formulário.

Tenho um plano de contas, estes plano de contas inicia-se em 10.000 e termina em 20.000.

Eu reservei o número 10.501 a 10.600 para a conta Fornecedores.

Criei um formulário para incluir mais fornecedores.

Consegui que no formulário, somente aceitasse os números nesta faixa.

Mas seria melhor ainda, se o próprio sistema já identificasse último número criado e acrescentasse mais 1 automáticamente quando fosse incluir mais um fornecedor.

Exemplo

Tenho os número já criados

10.501.......... XPT SA

10.502..........Casa Pernambucanas

10.502......... Mc Donalds

Ao ao clicar no formulário, ele já colocasse no campo "Conta" o número 10.503 somente aguardando para colocarmos o nome do fornecedor.

[Humm]

crie uma consulta que exiba o ultimo numero registrado.

depois você precisa criar um evento para o formulario, de preferencia em "após inserir"

nesse evento, crie uma rotina para pesquisar o ultimo numero lançado, e outra para soma-lo a 1

me.CampoDoForm = DLookUp("[campoDaConsulta]" , "nomeDaConsulta") + 1

vlw