Criar sequencia numérica baseada no registro anterior no formulário

Pessoal boa noite.

Estou com um formulário que já exite uma auto numeração, porém minha dúvida é a seguinte.

Quando vou abrir um novo registro, tenho um campo para colocar a sequência sem a auto numeração.
gostaria que ele cria-se o seguinte.
No campo codseg tenho um registro que começou com o número 1
O próximo teria que ser no mesmo campo codseg do novo registro.
o 1 do registro anterior + 1 deste novo registro.

Mas ai que esta a questão, teria que colocar o resultado que seria 2. Apenas quando salvar.


Alguém poderia me ajudar.


Obrigado

Fabio crie uma variável para capturar o último registro.

Exemplo:

Código:

Dim rMax As Integer 'Variável tipo inteiro longo
rMax = DMax("codseg", "SuaTabela") 'Variável captura o último registro da tabela
codseg = rMax + 1

Abraços,

Avelino, boa tarde!

Sua sugestão é colocar na propriedade valor padrão do campo no formulário?

Concordo com Avelino, em propriedades do form, modo estrutura, no campo Valor Padrão coloque:



=Nz(DMáx("[ID_CAT]";"[tb_CATEGORIA]"))+1



É batata.



Abraços,

Na verdade das duas formas - tanto através do VBA quanto na propriedade valor padrão do campo - funcionarão perfeitamente bem. Na propriedade valor padrão do campo é mais prático.