[Resolvido]Configurar máscara para telefone com 10 ou 11 dígitos

Boa tarde!

Bd em Access 2010.

Dúvida:
Como configurar em um formulário, um campo para cadastrar o número de telefone de forma que a máscara obedeça a quantidade de números inseridos?
Exemplo:

Fone: 3732232332 Com máscara para 10 dígitos: (37)3223-2332

Fone: 3798808-0888 Com máscara para 11 dígitos: (37)98808-0888

Desde já agradeço!

Boa tarde, algo parecido com isso abaixo

Código:

Private Sub Fone_AfterUpdate()
Dim NC
NC = Len(Fone)
If NC = 10 Then
Me.Fone.Format = "(@@)@@@@-@@@@" ' formato o campo com 10 digitos
End If
If NC = 11 Then
Me.Fone.Format = "(@@)@@@@@-@@@@" 'formato o campo com 11 digitos
End If
End Sub

Desculpem reabrir o tópico...

A função funcionou, porém a máscara não está ficando salva. Quando busco o registro, ele mostra o campo fone apenas com os números, sem a máscara.

Na tabela não vai salvar desse modo.

Na tabela é melhor que fiquem apenas os números, mas seria importante a máscara permanecer ativa no formulário quando o registro fosse acessado.

Alguma sugestão?

Eventos do formulário: Ao carregar, no atual e ao abrir. Coloque o código nesses eventos que eu te disse.

Dim NC
NC = Len(Fone)
If NC = 10 Then
Me.Fone.Format = "(@@)@@@@-@@@@" ' formato o campo com 10 digitos
End If
If NC = 11 Then
Me.Fone.Format = "(@@)@@@@@-@@@@" 'formato o campo com 11 digitos
End If

Agora sim!

Coloquei no evento do formulário "no Atual".

Mais uma vez, muito obrigado Silvio.

O fórum agradece o retorno.