[Resolvido]Saltar de campo automaticamente ao preencher campo com máscara de entrada

Boa tarde a todos,

Como posso fazer para que um campo que contenha máscara de entrada (ex: campo data)
ao digitar o último caráter salte automaticamente para o campo seguinte?

Obrigado
Cumprimentos

por um set focus?     Me!campo_seguinte.SetFocus

Sim, para que o campo seguinte ganhe foco ao acabar de preencher o campo data.

Entre caixas de combinação consegui no procedimento de evento ao atualizar, mas em campos com máscara de introdução já experimentei em vários eventos que me pareceriam lógicos mas não estou a conseguir.

olá, não tenho uma BD com data.
tente ao alterar (se a data tem 8 digitos):
if data=8 or not isnull (data) then
me.camposeguinte.setfocus
end if

como fez para a caixa de combinação?
se quiser disponibilize a sua BD.

Entre caixas de combinação fiz:

Private Sub Entidade_AfterUpdate()
Me!Local.SetFocus
End Sub

E funcionou.
Nos campos com máscara de entrada não estou a conseguir.

BD_Exemplo

falta a máscara de introdução

O campo data não tem máscara de introdução, está com o selecionador de datas, mas o campo Nr_Registo tem máscara de introdução.

fiz assim , mas ainda não deu:

tirei a máscara e pus no VB:
Private Sub Nr_RegistoEvento_Click()
Forms!frm_01_Registo!Nr_RegistoEvento.InputMask = "####/##"
End Sub

depois:
Private Sub Nr_RegistoEvento_Change()
If Not IsNull(Nr_RegistoEvento) And Len(Nr_RegistoEvento) = 7 Then
Me.Entidade.SetFocus
End If
End Sub

Agradeço o tempo e a disponibilidade amigo Pedro.
Pode ser que os masters dêem uma ajudinha (,")

Cumprimentos

Boa noite caros amigos,

Já fiz uma pesquisa profunda para tentar solucionar a minha questão mas não encontrei solução.

Pesquisa SetFocus

Agradecia se alguém puder dar uma ajudinha (,")

Cumprimentos

Bom dia,

Alguém pode dar uma sugestão? Please (,")

Cumprimentos

bom dia pcnet!

Peguei um exemplo com o nosso amigo João Paulo, no link abaixo.

https://www.maximoaccess.com/t348-resolvidocontar-caracteres

Porem, quando se utiliza a mascara, não funciona pois os marcadores (Ex: _ -  / ) contam como um caractere. Mais sem a mascara funciona perfeitamente.

Segue exemplo

Boa tarde amigo bigfill,

Obrigado pelo seu interesse em ajudar.
Ainda não tinha visto esse exemplo e é muito útil.
Mas ainda precisava de um código que executasse em campos com máscara de introdução e data.

Muito obrigado pela atenção
Cumprimentos

Boa noite a todos,
Alguém tem alguma sugestão?

Cumprimentos

Olá a todos (,")
Alguém tem alguma sugestão para saltar de campo quando acabar de preencher um campo com máscara de entrada?
Obrigado

pcnet

Teste 11 digitos para os campos com mascara

Boa tarde mestre Assis,

Obrigado pela ajuda
Nunca pensei que fosse uma coisa tão simples.

Resolvido com a sua dica:

- Colocação da máscara de introdução pretendida, no campo "Máscara de Introdução" na aba Dados da Folha de Propriedades;
- Alteração de Tabulação Automática para "Sim" na aba Outros da Folha de Propriedades;


O resto da resolução ficou assim:

Para campos com Caixa de Combinação:

Private Sub SeuCampoAtual_AfterUpdate()
Me.SeuCampoAReceberFoco.SetFocus
End Sub

Para campos com Data com configuração "Mostrar seleccionador de Datas"

Private Sub CampoData_Change()
Me.SeuCampoAReceberFoco.SetFocus
End Sub

Obrigado!
Cumprimentos

pcnet
Obrigado pelo retorno
Bom fim de semana